/ Linux Cubed Series 2: Applications / Linux Cubed Series 2 - Applications.iso / editors / emacs / xemacs / xemacs-1.004 / xemacs-1 / xemacs-19.13 / lisp / energize / energize-mode.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 63 74 68 6f 6d 70 40 |piled by| cthomp@|
|00000020| 77 69 6c 6c 6f 77 2e 63 | 73 2e 75 69 75 63 2e 65 |willow.c|s.uiuc.e|
|00000030| 64 75 20 6f 6e 20 54 75 | 65 20 41 75 67 20 32 39 |du on Tu|e Aug 29|
|00000040| 20 31 33 3a 35 39 3a 35 | 36 20 31 39 39 35 0a 3b | 13:59:5|6 1995.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 78 65 |;; from |file /xe|
|00000060| 6d 61 63 73 2f 78 65 6d | 61 63 73 2d 31 39 2e 31 |macs/xem|acs-19.1|
|00000070| 33 2d 72 65 6c 65 61 73 | 65 2f 65 64 69 74 6f 72 |3-releas|e/editor|
|00000080| 2f 6c 69 73 70 2f 65 6e | 65 72 67 69 7a 65 2f 65 |/lisp/en|ergize/e|
|00000090| 6e 65 72 67 69 7a 65 2d | 6d 6f 64 65 2e 65 6c 0a |nergize-|mode.el.|
|000000a0| 3b 3b 3b 20 65 6d 61 63 | 73 20 76 65 72 73 69 6f |;;; emac|s versio|
|000000b0| 6e 20 31 39 2e 31 33 20 | 58 45 6d 61 63 73 20 4c |n 19.13 |XEmacs L|
|000000c0| 75 63 69 64 2e 0a 3b 3b | 3b 20 62 79 74 65 63 6f |ucid..;;|; byteco|
|000000d0| 6d 70 20 76 65 72 73 69 | 6f 6e 20 32 2e 32 35 3b |mp versi|on 2.25;|
|000000e0| 20 31 2d 53 65 70 2d 39 | 34 2e 0a 3b 3b 3b 20 6f | 1-Sep-9|4..;;; o|
|000000f0| 70 74 69 6d 69 7a 61 74 | 69 6f 6e 20 69 73 20 6f |ptimizat|ion is o|
|00000100| 6e 2e 0a 3b 3b 3b 20 74 | 68 69 73 20 66 69 6c 65 |n..;;; t|his file|
|00000110| 20 75 73 65 73 20 6f 70 | 63 6f 64 65 73 20 77 68 | uses op|codes wh|
|00000120| 69 63 68 20 64 6f 20 6e | 6f 74 20 65 78 69 73 74 |ich do n|ot exist|
|00000130| 20 69 6e 20 45 6d 61 63 | 73 20 31 38 2e 0a 0a 28 | in Emac|s 18...(|
|00000140| 69 66 20 28 61 6e 64 20 | 28 62 6f 75 6e 64 70 20 |if (and |(boundp |
|00000150| 27 65 6d 61 63 73 2d 76 | 65 72 73 69 6f 6e 29 0a |'emacs-v|ersion).|
|00000160| 09 20 28 6f 72 20 28 61 | 6e 64 20 28 62 6f 75 6e |. (or (a|nd (boun|
|00000170| 64 70 20 27 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |dp 'epoc|h::versi|
|00000180| 6f 6e 29 20 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |on) epoc|h::versi|
|00000190| 6f 6e 29 0a 09 20 20 20 | 20 20 28 73 74 72 69 6e |on)..   |  (strin|
|000001a0| 67 2d 6c 65 73 73 70 20 | 65 6d 61 63 73 2d 76 65 |g-lessp |emacs-ve|
|000001b0| 72 73 69 6f 6e 20 22 31 | 39 22 29 29 29 0a 20 20 |rsion "1|9"))).  |
|000001c0| 20 20 28 65 72 72 6f 72 | 20 22 54 68 69 73 20 66 |  (error| "This f|
|000001d0| 69 6c 65 20 77 61 73 20 | 63 6f 6d 70 69 6c 65 64 |ile was |compiled|
|000001e0| 20 66 6f 72 20 45 6d 61 | 63 73 20 31 39 2e 22 29 | for Ema|cs 19.")|
|000001f0| 29 0a 0a 28 66 73 65 74 | 20 27 65 6e 65 72 67 69 |)..(fset| 'energi|
|00000200| 7a 65 2d 77 72 69 74 65 | 2d 66 69 6c 65 2d 62 75 |ze-write|-file-bu|
|00000210| 66 66 65 72 2d 70 20 23 | 5b 6e 69 6c 20 22 c0 70 |ffer-p #|[nil ".p|
|00000220| 21 87 22 20 5b 65 6e 65 | 72 67 69 7a 65 2d 62 75 |!." [ene|rgize-bu|
|00000230| 66 66 65 72 2d 70 5d 20 | 32 5d 29 0a 28 66 73 65 |ffer-p] |2]).(fse|
|00000240| 74 20 27 65 6e 65 72 67 | 69 7a 65 2d 62 65 67 69 |t 'energ|ize-begi|
|00000250| 6e 6e 69 6e 67 2d 6f 66 | 2d 64 65 66 75 6e 20 23 |nning-of|-defun #|
|00000260| 5b 28 26 6f 70 74 69 6f | 6e 61 6c 20 61 72 67 29 |[(&optio|nal arg)|
|00000270| 20 22 08 ac 82 c1 10 c2 | 70 21 ac 84 c3 c4 21 87 | "......|p!....!.|
|00000280| 08 c5 57 ab 85 c6 08 5b | 21 87 08 c5 56 ad a7 6f |..W....[|!...V..o|
|00000290| ac 83 c7 75 88 6f ac 8a | c8 60 21 ac 85 c7 75 88 |...u.o..|.`!...u.|
|000002a0| aa 73 60 1e 09 ca cb 70 | 60 60 cc cd 26 06 88 29 |.s`....p|``..&..)|
|000002b0| 08 53 89 10 aa 55 87 22 | 20 5b 61 72 67 20 31 20 |.S...U."| [arg 1 |
|000002c0| 65 6e 65 72 67 69 7a 65 | 2d 62 75 66 66 65 72 2d |energize|-buffer-|
|000002d0| 70 20 65 72 72 6f 72 20 | 22 4e 6f 74 20 61 6e 20 |p error |"Not an |
|000002e0| 45 6e 65 72 67 69 7a 65 | 20 62 75 66 66 65 72 22 |Energize| buffer"|
|000002f0| 20 30 20 65 6e 65 72 67 | 69 7a 65 2d 65 6e 64 2d | 0 energ|ize-end-|
|00000300| 6f 66 2d 64 65 66 75 6e | 20 2d 31 20 65 6e 65 72 |of-defun| -1 ener|
|00000310| 67 69 7a 65 2d 65 78 74 | 65 6e 74 2d 61 74 20 70 |gize-ext|ent-at p|
|00000320| 6f 73 20 6d 61 70 2d 65 | 78 74 65 6e 74 73 20 23 |os map-e|xtents #|
|00000330| 5b 28 65 78 74 65 6e 74 | 20 64 75 6d 6d 79 29 20 |[(extent| dummy) |
|00000340| 22 c0 09 21 89 12 60 57 | ad 82 5c 6e 62 87 22 20 |"..!..`W|..\nb." |
|00000350| 5b 65 78 74 65 6e 74 2d | 73 74 61 72 74 2d 70 6f |[extent-|start-po|
|00000360| 73 69 74 69 6f 6e 20 65 | 78 74 65 6e 74 20 70 6f |sition e|xtent po|
|00000370| 73 5d 20 32 5d 20 6e 69 | 6c 20 74 5d 20 38 20 22 |s] 2] ni|l t] 8 "|
|00000380| 5c 0a 4d 6f 76 65 20 70 | 6f 69 6e 74 20 74 6f 20 |\.Move p|oint to |
|00000390| 74 68 65 20 62 65 67 69 | 6e 6e 69 6e 67 20 6f 66 |the begi|nning of|
|000003a0| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 74 6f 70 | the cur|rent top|
|000003b0| 2d 6c 65 76 65 6c 20 66 | 6f 72 6d 2e 0a 57 69 74 |-level f|orm..Wit|
|000003c0| 68 20 61 20 6e 75 6d 65 | 72 69 63 20 61 72 67 75 |h a nume|ric argu|
|000003d0| 6d 65 6e 74 2c 20 6d 6f | 76 65 20 62 61 63 6b 20 |ment, mo|ve back |
|000003e0| 74 68 61 74 20 6d 61 6e | 79 20 66 6f 72 6d 73 2e |that man|y forms.|
|000003f0| 22 20 22 5f 70 22 5d 29 | 0a 28 66 73 65 74 20 27 |" "_p"])|.(fset '|
|00000400| 65 6e 65 72 67 69 7a 65 | 2d 65 6e 64 2d 6f 66 2d |energize|-end-of-|
|00000410| 64 65 66 75 6e 20 23 5b | 28 26 6f 70 74 69 6f 6e |defun #[|(&option|
|00000420| 61 6c 20 61 72 67 29 20 | 22 08 ac 82 c1 10 c2 70 |al arg) |"......p|
|00000430| 21 ac 84 c3 c4 21 87 08 | c5 57 ab 85 c6 08 5b 21 |!....!..|.W....[!|
|00000440| 87 08 c5 56 ad a7 6d ac | 83 c1 75 88 6d ac 8a c7 |...V..m.|..u.m...|
|00000450| 60 21 ac 85 c1 75 88 aa | 73 60 1e 08 c9 ca 70 60 |`!...u..|s`....p`|
|00000460| 60 cb cc 26 06 88 29 08 | 53 89 10 aa 55 87 22 20 |`..&..).|S...U." |
|00000470| 5b 61 72 67 20 31 20 65 | 6e 65 72 67 69 7a 65 2d |[arg 1 e|nergize-|
|00000480| 62 75 66 66 65 72 2d 70 | 20 65 72 72 6f 72 20 22 |buffer-p| error "|
|00000490| 4e 6f 74 20 61 6e 20 45 | 6e 65 72 67 69 7a 65 20 |Not an E|nergize |
|000004a0| 62 75 66 66 65 72 22 20 | 30 20 65 6e 65 72 67 69 |buffer" |0 energi|
|000004b0| 7a 65 2d 62 65 67 69 6e | 6e 69 6e 67 2d 6f 66 2d |ze-begin|ning-of-|
|000004c0| 64 65 66 75 6e 20 65 6e | 65 72 67 69 7a 65 2d 65 |defun en|ergize-e|
|000004d0| 78 74 65 6e 74 2d 61 74 | 20 70 6f 73 20 6d 61 70 |xtent-at| pos map|
|000004e0| 2d 65 78 74 65 6e 74 73 | 20 23 5b 28 65 78 74 65 |-extents| #[(exte|
|000004f0| 6e 74 20 64 75 6d 6d 79 | 29 20 22 c0 09 21 89 12 |nt dummy|) "..!..|
|00000500| 60 56 ad 82 5c 6e 62 87 | 22 20 5b 65 78 74 65 6e |`V..\nb.|" [exten|
|00000510| 74 2d 65 6e 64 2d 70 6f | 73 69 74 69 6f 6e 20 65 |t-end-po|sition e|
|00000520| 78 74 65 6e 74 20 70 6f | 73 5d 20 32 5d 20 6e 69 |xtent po|s] 2] ni|
|00000530| 6c 20 74 5d 20 38 20 22 | 5c 0a 4d 6f 76 65 20 70 |l t] 8 "|\.Move p|
|00000540| 6f 69 6e 74 20 74 6f 20 | 74 68 65 20 65 6e 64 20 |oint to |the end |
|00000550| 6f 66 20 74 68 65 20 63 | 75 72 72 65 6e 74 20 74 |of the c|urrent t|
|00000560| 6f 70 2d 6c 65 76 65 6c | 20 66 6f 72 6d 2e 0a 57 |op-level| form..W|
|00000570| 69 74 68 20 61 20 6e 75 | 6d 65 72 69 63 20 61 72 |ith a nu|meric ar|
|00000580| 67 75 6d 65 6e 74 2c 20 | 6d 6f 76 65 20 66 6f 72 |gument, |move for|
|00000590| 77 61 72 64 20 6f 76 65 | 72 20 74 68 61 74 20 6d |ward ove|r that m|
|000005a0| 61 6e 79 20 66 6f 72 6d | 73 2e 22 20 22 5f 70 22 |any form|s." "_p"|
|000005b0| 5d 29 0a 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |]).(byte|-code ".|
|000005c0| c1 4d 88 c2 c3 4d 88 c4 | c5 4d 88 c6 c7 4d 87 22 |.M...M..|.M...M."|
|000005d0| 20 5b 65 6e 65 72 67 69 | 7a 65 2d 77 72 69 74 65 | [energi|ze-write|
|000005e0| 2d 64 61 74 61 2d 68 6f | 6f 6b 20 23 5b 28 6e 61 |-data-ho|ok #[(na|
|000005f0| 6d 65 29 20 22 c0 70 21 | ad 92 c1 c2 0b 5c 22 88 |me) ".p!|.....\".|
|00000600| c4 c5 21 88 c6 20 88 c1 | c7 0b 5c 22 88 c8 87 22 |..!.. ..|..\"..."|
|00000610| 20 5b 65 6e 65 72 67 69 | 7a 65 2d 62 75 66 66 65 | [energi|ze-buffe|
|00000620| 72 2d 70 20 6d 65 73 73 | 61 67 65 20 22 73 61 76 |r-p mess|age "sav|
|00000630| 69 6e 67 20 25 73 20 74 | 6f 20 45 6e 65 72 67 69 |ing %s t|o Energi|
|00000640| 7a 65 2e 2e 2e 22 20 6e | 61 6d 65 20 65 6e 65 72 |ze..." n|ame ener|
|00000650| 67 69 7a 65 2d 65 78 65 | 63 75 74 65 2d 63 6f 6d |gize-exe|cute-com|
|00000660| 6d 61 6e 64 20 22 73 61 | 76 65 22 20 65 6e 65 72 |mand "sa|ve" ener|
|00000670| 67 69 7a 65 2d 75 70 64 | 61 74 65 2d 6d 65 6e 75 |gize-upd|ate-menu|
|00000680| 62 61 72 20 22 73 61 76 | 65 64 20 25 73 20 74 6f |bar "sav|ed %s to|
|00000690| 20 45 6e 65 72 67 69 7a | 65 2e 22 20 74 5d 20 33 | Energiz|e." t] 3|
|000006a0| 5d 20 65 6e 65 72 67 69 | 7a 65 2d 72 65 76 65 72 |] energi|ze-rever|
|000006b0| 74 2d 62 75 66 66 65 72 | 2d 69 6e 73 65 72 74 2d |t-buffer|-insert-|
|000006c0| 66 69 6c 65 2d 63 6f 6e | 74 65 6e 74 73 2d 68 6f |file-con|tents-ho|
|000006d0| 6f 6b 20 23 5b 28 66 69 | 6c 65 20 6e 6f 63 6f 6e |ok #[(fi|le nocon|
|000006e0| 66 69 72 6d 29 20 22 c0 | 70 21 ac 84 c1 c2 21 88 |firm) ".|p!....!.|
|000006f0| 7e 88 0b 0c 9a ab 99 c5 | 0b 21 ab 8e c6 1c c7 20 |~.......|.!..... |
|00000700| 88 c8 20 88 29 c9 0b ca | 5c 22 88 cb cc 21 88 aa |.. .)...|\"...!..|
|00000710| 91 c5 0b 21 ac 85 c1 cd | 0b 5c 22 88 c8 20 88 c9 |...!....|.\".. ..|
|00000720| 0b 21 88 ca 87 22 20 5b | 65 6e 65 72 67 69 7a 65 |.!..." [|energize|
|00000730| 2d 62 75 66 66 65 72 2d | 70 20 65 72 72 6f 72 20 |-buffer-|p error |
|00000740| 22 65 6e 65 72 67 69 7a | 65 2d 72 65 76 65 72 74 |"energiz|e-revert|
|00000750| 2d 62 75 66 66 65 72 2d | 68 6f 6f 6b 20 63 61 6c |-buffer-|hook cal|
|00000760| 6c 65 64 20 66 6f 72 20 | 61 20 6e 6f 6e 2d 65 6e |led for |a non-en|
|00000770| 65 72 67 69 7a 65 20 62 | 75 66 66 65 72 22 20 66 |ergize b|uffer" f|
|00000780| 69 6c 65 20 62 75 66 66 | 65 72 2d 66 69 6c 65 2d |ile buff|er-file-|
|00000790| 6e 61 6d 65 20 66 69 6c | 65 2d 65 78 69 73 74 73 |name fil|e-exists|
|000007a0| 2d 70 20 6e 69 6c 20 75 | 6e 6c 6f 63 6b 2d 62 75 |-p nil u|nlock-bu|
|000007b0| 66 66 65 72 20 65 72 61 | 73 65 2d 62 75 66 66 65 |ffer era|se-buffe|
|000007c0| 72 20 69 6e 73 65 72 74 | 2d 66 69 6c 65 2d 63 6f |r insert|-file-co|
|000007d0| 6e 74 65 6e 74 73 20 74 | 20 65 6e 65 72 67 69 7a |ntents t| energiz|
|000007e0| 65 2d 65 78 65 63 75 74 | 65 2d 63 6f 6d 6d 61 6e |e-execut|e-comman|
|000007f0| 64 20 22 72 65 76 65 72 | 74 22 20 22 46 69 6c 65 |d "rever|t" "File|
|00000800| 20 25 73 20 6e 6f 20 6c | 6f 6e 67 65 72 20 65 78 | %s no l|onger ex|
|00000810| 69 73 74 73 21 22 5d 20 | 33 5d 20 65 6e 65 72 67 |ists!"] |3] energ|
|00000820| 69 7a 65 2d 6b 69 6c 6c | 2d 62 75 66 66 65 72 2d |ize-kill|-buffer-|
|00000830| 68 6f 6f 6b 20 23 5b 6e | 69 6c 20 22 c0 70 21 ab |hook #[n|il ".p!.|
|00000840| 86 c1 70 21 88 aa 84 c2 | c3 21 88 c4 87 22 20 5b |..p!....|.!..." [|
|00000850| 65 6e 65 72 67 69 7a 65 | 2d 62 75 66 66 65 72 2d |energize|-buffer-|
|00000860| 70 20 65 6e 65 72 67 69 | 7a 65 2d 72 65 71 75 65 |p energi|ze-reque|
|00000870| 73 74 2d 6b 69 6c 6c 2d | 62 75 66 66 65 72 20 65 |st-kill-|buffer e|
|00000880| 72 72 6f 72 20 22 65 6e | 65 72 67 69 7a 65 2d 6b |rror "en|ergize-k|
|00000890| 69 6c 6c 2d 62 75 66 66 | 65 72 2d 68 6f 6f 6b 20 |ill-buff|er-hook |
|000008a0| 63 61 6c 6c 65 64 20 6f | 6e 20 61 20 6e 6f 6e 2d |called o|n a non-|
|000008b0| 65 6e 65 72 67 69 7a 65 | 20 62 75 66 66 65 72 22 |energize| buffer"|
|000008c0| 20 74 5d 20 32 5d 20 65 | 6e 65 72 67 69 7a 65 2d | t] 2] e|nergize-|
|000008d0| 65 64 69 74 2d 64 65 66 | 69 6e 69 74 69 6f 6e 2d |edit-def|inition-|
|000008e0| 64 65 66 61 75 6c 74 20 | 23 5b 6e 69 6c 20 22 8a |default |#[nil ".|
|000008f0| 68 7a c0 3e ac 8a c1 c2 | 21 ac 85 c3 75 88 aa 76 |hz.>....|!...u..v|
|00000900| c1 c4 21 ab 85 c3 75 88 | aa 76 c5 c4 c6 c7 23 ad |..!...u.|.v....#.|
|00000910| 94 c3 75 88 60 c8 c9 21 | 88 c1 ca 21 ab 85 c3 75 |..u.`..!|...!...u|
|00000920| 88 aa 76 60 7b 29 87 22 | 20 5b 28 31 31 39 20 39 |..v`{)."| [(119 9|
|00000930| 35 29 20 6c 6f 6f 6b 69 | 6e 67 2d 61 74 20 22 5c |5) looki|ng-at "\|
|00000940| 5c 73 77 5c 5c 7c 5c 5c | 73 5f 5c 5c 7c 5c 5c 27 |\sw\\|\\|s_\\|\\'|
|00000950| 22 20 31 20 22 5c 5c 73 | 77 5c 5c 7c 5c 5c 73 5f |" 1 "\\s|w\\|\\s_|
|00000960| 22 20 72 65 2d 73 65 61 | 72 63 68 2d 62 61 63 6b |" re-sea|rch-back|
|00000970| 77 61 72 64 20 6e 69 6c | 20 74 20 66 6f 72 77 61 |ward nil| t forwa|
|00000980| 72 64 2d 73 65 78 70 20 | 2d 31 20 22 5c 5c 73 27 |rd-sexp |-1 "\\s'|
|00000990| 22 5d 20 34 5d 5d 20 32 | 29 0a 28 66 73 65 74 20 |"] 4]] 2|).(fset |
|000009a0| 27 65 6e 65 72 67 69 7a | 65 2d 65 64 69 74 2d 64 |'energiz|e-edit-d|
|000009b0| 65 66 69 6e 69 74 69 6f | 6e 20 23 5b 28 64 65 66 |efinitio|n #[(def|
|000009c0| 29 20 22 c0 20 ab 8f c1 | c2 c3 0c 3a ab 84 0c 40 |) ". ...|...:...@|
|000009d0| aa 81 0c c5 24 87 c6 0c | 21 87 22 20 5b 63 6f 6e |....$...|!." [con|
|000009e0| 6e 65 63 74 65 64 2d 74 | 6f 2d 65 6e 65 72 67 69 |nected-t|o-energi|
|000009f0| 7a 65 2d 70 20 65 6e 65 | 72 67 69 7a 65 2d 65 78 |ze-p ene|rgize-ex|
|00000a00| 65 63 75 74 65 2d 63 6f | 6d 6d 61 6e 64 20 22 65 |ecute-co|mmand "e|
|00000a10| 64 69 74 64 65 66 22 20 | 6e 69 6c 20 64 65 66 20 |ditdef" |nil def |
|00000a20| 74 20 66 69 6e 64 2d 74 | 61 67 5d 20 35 20 22 5c |t find-t|ag] 5 "\|
|00000a30| 0a 49 66 20 63 6f 6e 6e | 65 63 74 65 64 20 74 6f |.If conn|ected to|
|00000a40| 20 45 6e 65 72 67 69 7a | 65 2c 20 74 68 65 20 45 | Energiz|e, the E|
|00000a50| 6e 65 72 67 69 7a 65 20 | 64 61 74 61 62 61 73 65 |nergize |database|
|00000a60| 20 69 73 20 75 73 65 64 | 2e 20 20 0a 4f 74 68 65 | is used|.  .Othe|
|00000a70| 72 77 69 73 65 2c 20 60 | 66 69 6e 64 2d 74 61 67 |rwise, `|find-tag|
|00000a80| 27 20 69 73 20 69 6e 76 | 6f 6b 65 64 2e 0a 54 68 |' is inv|oked..Th|
|00000a90| 65 20 58 20 73 65 6c 65 | 63 74 69 6f 6e 20 69 73 |e X sele|ction is|
|00000aa0| 20 75 73 65 64 20 61 73 | 20 61 20 64 65 66 61 75 | used as| a defau|
|00000ab0| 6c 74 2c 20 69 66 20 69 | 74 20 65 78 69 73 74 73 |lt, if i|t exists|
|00000ac0| 20 61 6e 64 20 63 6f 6e | 74 61 69 6e 73 20 6e 6f | and con|tains no|
|00000ad0| 20 0a 6e 65 77 6c 69 6e | 65 73 2e 20 20 4f 74 68 | .newlin|es.  Oth|
|00000ae0| 65 72 77 69 73 65 2c 20 | 74 68 65 20 70 72 65 63 |erwise, |the prec|
|00000af0| 65 65 64 69 6e 67 20 74 | 6f 6b 65 6e 20 69 73 20 |eeding t|oken is |
|00000b00| 75 73 65 64 20 61 73 20 | 61 20 64 65 66 61 75 6c |used as |a defaul|
|00000b10| 74 2e 20 20 0a 49 66 20 | 69 6e 76 6f 6b 65 64 20 |t.  .If |invoked |
|00000b20| 66 72 6f 6d 20 61 20 6d | 6f 75 73 65 20 63 6f 6d |from a m|ouse com|
|00000b30| 6d 61 6e 64 2c 20 70 72 | 6f 6d 70 74 69 6e 67 20 |mand, pr|ompting |
|00000b40| 68 61 70 70 65 6e 73 20 | 77 69 74 68 20 61 20 64 |happens |with a d|
|00000b50| 69 61 6c 6f 67 20 62 6f | 78 3b 20 0a 6f 74 68 65 |ialog bo|x; .othe|
|00000b60| 72 77 69 73 65 2c 20 74 | 68 65 20 6d 69 6e 69 62 |rwise, t|he minib|
|00000b70| 75 66 66 65 72 20 69 73 | 20 75 73 65 64 2e 22 20 |uffer is| used." |
|00000b80| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 20 ab 91 |(byte-co|de ". ..|
|00000b90| c1 5c 6e 21 ac 8a c3 5c | 6e 21 ac 85 c4 5c 6e 21 |.\n!...\|n!...\n!|
|00000ba0| ab 82 c5 87 c6 89 1e 07 | 1e 08 c9 20 ab b0 ca 20 |........|... ... |
|00000bb0| 16 08 cb cc 0e 08 5c 22 | ab 8a 0e 08 cd 95 c6 4f |......\"|.......O|
|00000bc0| 16 08 aa 6f cb ce 0e 08 | 5c 22 ab 8a 0e 08 cd 89 |...o....|\"......|
|00000bd0| 94 4f 16 08 aa 6f cb cf | 0e 08 5c 22 ab 83 c6 16 |.O...o..|..\"....|
|00000be0| 08 0e 08 ac 84 d0 20 16 | 08 c0 20 ab 94 d1 0e 08 |...... .|.. .....|
|00000bf0| ab 87 d2 d3 0e 08 5c 22 | aa 81 d4 c6 89 89 89 25 |......\"|.......%|
|00000c00| aa 92 d5 d6 21 ab 85 d5 | d7 21 ac 85 d8 d9 da 5c |....!...|.!.....\|
|00000c10| 22 88 d6 d4 21 89 16 07 | db 9a ac 86 0e 07 dc 9a |"...!...|........|
|00000c20| ab 84 0e 08 16 07 0e 07 | 2a 43 87 22 20 5b 63 6f |........|*C." [co|
|00000c30| 6e 6e 65 63 74 65 64 2d | 74 6f 2d 65 6e 65 72 67 |nnected-|to-energ|
|00000c40| 69 7a 65 2d 70 20 6d 65 | 6e 75 2d 65 76 65 6e 74 |ize-p me|nu-event|
|00000c50| 2d 70 20 6c 61 73 74 2d | 63 6f 6d 6d 61 6e 64 2d |-p last-|command-|
|00000c60| 65 76 65 6e 74 20 62 75 | 74 74 6f 6e 2d 70 72 65 |event bu|tton-pre|
|00000c70| 73 73 2d 65 76 65 6e 74 | 2d 70 20 62 75 74 74 6f |ss-event|-p butto|
|00000c80| 6e 2d 72 65 6c 65 61 73 | 65 2d 65 76 65 6e 74 2d |n-releas|e-event-|
|00000c90| 70 20 28 6e 69 6c 29 20 | 6e 69 6c 20 64 65 66 20 |p (nil) |nil def |
|00000ca0| 64 65 66 61 75 6c 74 20 | 78 2d 73 65 6c 65 63 74 |default |x-select|
|00000cb0| 69 6f 6e 2d 6f 77 6e 65 | 72 2d 70 20 78 2d 67 65 |ion-owne|r-p x-ge|
|00000cc0| 74 2d 73 65 6c 65 63 74 | 69 6f 6e 20 73 74 72 69 |t-select|ion stri|
|00000cd0| 6e 67 2d 6d 61 74 63 68 | 20 22 5c 5c 60 5b 20 09 |ng-match| "\\`[ .|
|00000ce0| 5c 6e 5d 2b 22 20 30 20 | 22 5b 20 09 5c 6e 5d 2b |\n]+" 0 |"[ .\n]+|
|00000cf0| 5c 5c 27 22 20 22 5b 20 | 09 5c 6e 5d 22 20 65 6e |\\'" "[ |.\n]" en|
|00000d00| 65 72 67 69 7a 65 2d 65 | 64 69 74 2d 64 65 66 69 |ergize-e|dit-defi|
|00000d10| 6e 69 74 69 6f 6e 2d 64 | 65 66 61 75 6c 74 20 63 |nition-d|efault c|
|00000d20| 6f 6d 70 6c 65 74 69 6e | 67 2d 72 65 61 64 20 66 |ompletin|g-read f|
|00000d30| 6f 72 6d 61 74 20 22 45 | 64 69 74 20 64 65 66 69 |ormat "E|dit defi|
|00000d40| 6e 69 74 69 6f 6e 20 5b | 25 73 5d 3a 20 22 20 22 |nition [|%s]: " "|
|00000d50| 45 64 69 74 20 64 65 66 | 69 6e 69 74 69 6f 6e 3a |Edit def|inition:|
|00000d60| 20 22 20 66 62 6f 75 6e | 64 70 20 66 69 6e 64 2d | " fboun|dp find-|
|00000d70| 74 61 67 2d 74 61 67 20 | 66 69 6e 64 2d 74 61 67 |tag-tag |find-tag|
|00000d80| 2d 64 65 66 61 75 6c 74 | 20 72 65 71 75 69 72 65 |-default| require|
|00000d90| 20 74 61 67 73 20 22 65 | 74 61 67 73 22 20 22 22 | tags "e|tags" ""|
|00000da0| 20 28 22 22 29 5d 20 37 | 29 5d 29 0a 28 62 79 74 | ("")] 7|)]).(byt|
|00000db0| 65 2d 63 6f 64 65 20 22 | c0 09 c2 c3 23 88 c0 09 |e-code "|....#...|
|00000dc0| c4 c5 23 87 22 20 5b 64 | 65 66 69 6e 65 2d 6b 65 |..#." [d|efine-ke|
|00000dd0| 79 20 67 6c 6f 62 61 6c | 2d 6d 61 70 20 22 ae 22 |y global|-map "."|
|00000de0| 20 65 6e 65 72 67 69 7a | 65 2d 65 64 69 74 2d 64 | energiz|e-edit-d|
|00000df0| 65 66 69 6e 69 74 69 6f | 6e 20 22 c2 22 20 65 6e |efinitio|n "." en|
|00000e00| 65 72 67 69 7a 65 2d 62 | 75 69 6c 64 2d 61 2d 74 |ergize-b|uild-a-t|
|00000e10| 61 72 67 65 74 5d 20 34 | 29 0a 28 66 73 65 74 20 |arget] 4|).(fset |
|00000e20| 27 64 69 73 63 6f 6e 6e | 65 63 74 2d 66 72 6f 6d |'disconn|ect-from|
|00000e30| 2d 65 6e 65 72 67 69 7a | 65 2d 71 75 65 72 79 20 |-energiz|e-query |
|00000e40| 23 5b 6e 69 6c 20 22 c0 | c1 21 ac 84 c2 c3 21 88 |#[nil ".|.!....!.|
|00000e50| c4 20 87 22 20 5b 79 2d | 6f 72 2d 6e 2d 70 20 22 |. ." [y-|or-n-p "|
|00000e60| 44 69 73 63 6f 6e 6e 65 | 63 74 20 66 72 6f 6d 20 |Disconne|ct from |
|00000e70| 45 6e 65 72 67 69 7a 65 | 3f 20 22 20 65 72 72 6f |Energize|? " erro|
|00000e80| 72 20 22 6e 6f 74 20 63 | 6f 6e 66 69 72 6d 65 64 |r "not c|onfirmed|
|00000e90| 22 20 64 69 73 63 6f 6e | 6e 65 63 74 2d 66 72 6f |" discon|nect-fro|
|00000ea0| 6d 2d 65 6e 65 72 67 69 | 7a 65 5d 20 32 20 22 5c |m-energi|ze] 2 "\|
|00000eb0| 0a 44 69 73 63 6f 6e 6e | 65 63 74 20 74 68 69 73 |.Disconn|ect this|
|00000ec0| 20 65 6d 61 63 73 20 66 | 72 6f 6d 20 74 68 65 20 | emacs f|rom the |
|00000ed0| 45 6e 65 72 67 69 7a 65 | 20 73 65 72 76 65 72 2c |Energize| server,|
|00000ee0| 20 61 66 74 65 72 20 63 | 6f 6e 66 69 72 6d 69 6e | after c|onfirmin|
|00000ef0| 67 2e 22 20 6e 69 6c 5d | 29 0a 28 62 79 74 65 2d |g." nil]|).(byte-|
|00000f00| 63 6f 64 65 20 22 c0 c1 | 4d 88 c2 c3 4d 88 c4 c5 |code "..|M...M...|
|00000f10| 4d 88 c6 c7 4d 88 c8 c9 | 4d 88 ca cb 4d 88 cc cd |M...M...|M...M...|
|00000f20| 4d 88 ce cf 4d 87 22 20 | 5b 65 6e 65 72 67 69 7a |M...M." |[energiz|
|00000f30| 65 2d 69 6e 73 65 72 74 | 2d 73 6c 6f 74 73 20 23 |e-insert|-slots #|
|00000f40| 5b 28 67 6f 74 2d 74 6f | 2d 74 6f 70 2d 70 20 6c |[(got-to|-top-p l|
|00000f50| 29 20 22 08 c1 3d ac 84 | c2 c3 21 88 0c ab 85 c5 |) "..=..|..!.....|
|00000f60| 20 88 aa 83 c6 79 88 c7 | c8 c9 ca 23 ac 91 c7 cb | ....y..|...#....|
|00000f70| c9 ca 23 ac 8a cc c8 21 | ac 85 cc cb 21 ab 84 cd |..#....!|....!...|
|00000f80| ce 21 88 cc cf 21 ac 8b | 60 64 3d ac 86 d0 d1 21 |.!...!..|`d=....!|
|00000f90| 88 aa 70 d2 20 88 8a d3 | d4 0e 15 5c 22 88 29 d6 |..p. ...|...\".).|
|00000fa0| 75 87 22 20 5b 6d 61 6a | 6f 72 2d 6d 6f 64 65 20 |u." [maj|or-mode |
|00000fb0| 65 6e 65 72 67 69 7a 65 | 2d 70 72 6f 6a 65 63 74 |energize|-project|
|00000fc0| 2d 6d 6f 64 65 20 65 72 | 72 6f 72 20 22 43 6f 6d |-mode er|ror "Com|
|00000fd0| 6d 61 6e 64 20 61 76 61 | 69 6c 61 62 6c 65 20 6f |mand ava|ilable o|
|00000fe0| 6e 6c 79 20 69 6e 20 70 | 72 6f 6a 65 63 74 20 62 |nly in p|roject b|
|00000ff0| 75 66 66 65 72 73 22 20 | 67 6f 74 2d 74 6f 2d 74 |uffers" |got-to-t|
|00001000| 6f 70 2d 70 20 62 65 67 | 69 6e 6e 69 6e 67 2d 6f |op-p beg|inning-o|
|00001010| 66 2d 62 75 66 66 65 72 | 20 30 20 73 65 61 72 63 |f-buffer| 0 searc|
|00001020| 68 2d 62 61 63 6b 77 61 | 72 64 20 22 52 65 6c 61 |h-backwa|rd "Rela|
|00001030| 74 65 64 20 50 72 6f 6a | 65 63 74 73 3a 22 20 6e |ted Proj|ects:" n|
|00001040| 69 6c 20 74 20 22 41 73 | 73 6f 63 69 61 74 65 64 |il t "As|sociated|
|00001050| 20 46 69 6c 65 73 3a 22 | 20 6c 6f 6f 6b 69 6e 67 | Files:"| looking|
|00001060| 2d 61 74 20 70 72 65 76 | 69 6f 75 73 2d 6c 69 6e |-at prev|ious-lin|
|00001070| 65 20 32 20 22 24 22 20 | 6e 65 78 74 2d 6c 69 6e |e 2 "$" |next-lin|
|00001080| 65 20 31 20 6e 65 77 6c | 69 6e 65 20 6d 61 70 63 |e 1 newl|ine mapc|
|00001090| 61 72 20 23 5b 28 69 29 | 20 22 08 63 88 c1 20 87 |ar #[(i)| ".c.. .|
|000010a0| 22 20 5b 69 20 6e 65 77 | 6c 69 6e 65 5d 20 31 5d |" [i new|line] 1]|
|000010b0| 20 6c 20 31 38 5d 20 34 | 5d 20 65 6e 65 72 67 69 | l 18] 4|] energi|
|000010c0| 7a 65 2d 69 6e 73 65 72 | 74 2d 72 75 6c 65 20 23 |ze-inser|t-rule #|
|000010d0| 5b 6e 69 6c 20 22 c0 c1 | c2 5c 22 87 22 20 5b 65 |[nil "..|.\"." [e|
|000010e0| 6e 65 72 67 69 7a 65 2d | 69 6e 73 65 72 74 2d 73 |nergize-|insert-s|
|000010f0| 6c 6f 74 73 20 74 20 28 | 22 20 20 20 20 20 20 20 |lots t (|"       |
|00001100| 20 20 20 20 52 75 6c 65 | 73 3a 22 20 22 20 20 20 |    Rule|s:" "   |
|00001110| 20 20 20 20 20 20 20 3c | 72 75 6c 65 3e 3a 20 6c |       <|rule>: l|
|00001120| 63 63 20 2d 58 65 7a 20 | 2d 63 20 2d 67 20 2d 58 |cc -Xez |-c -g -X|
|00001130| 61 20 2d 6f 20 24 6f 62 | 6a 65 63 74 20 24 73 6f |a -o $ob|ject $so|
|00001140| 75 72 63 65 22 29 5d 20 | 33 20 6e 69 6c 20 6e 69 |urce")] |3 nil ni|
|00001150| 6c 5d 20 65 6e 65 72 67 | 69 7a 65 2d 69 6e 73 65 |l] energ|ize-inse|
|00001160| 72 74 2d 6f 62 6a 65 63 | 74 2d 66 69 6c 65 2d 74 |rt-objec|t-file-t|
|00001170| 61 72 67 65 74 20 23 5b | 6e 69 6c 20 22 c0 c1 c2 |arget #[|nil "...|
|00001180| 5c 22 87 22 20 5b 65 6e | 65 72 67 69 7a 65 2d 69 |\"." [en|ergize-i|
|00001190| 6e 73 65 72 74 2d 73 6c | 6f 74 73 20 6e 69 6c 20 |nsert-sl|ots nil |
|000011a0| 28 22 20 20 20 20 20 4f | 62 6a 65 63 74 20 46 69 |("     O|bject Fi|
|000011b0| 6c 65 3a 20 3c 6f 62 6a | 65 63 74 2d 66 69 6c 65 |le: <obj|ect-file|
|000011c0| 3e 22 20 22 20 20 20 20 | 20 53 6f 75 72 63 65 20 |>" "    | Source |
|000011d0| 46 69 6c 65 3a 20 3c 73 | 6f 75 72 63 65 2d 66 69 |File: <s|ource-fi|
|000011e0| 6c 65 3e 22 20 22 20 20 | 20 20 20 20 42 75 69 6c |le>" "  |    Buil|
|000011f0| 64 20 52 75 6c 65 3a 20 | 3c 72 75 6c 65 3e 22 29 |d Rule: |<rule>")|
|00001200| 5d 20 33 20 6e 69 6c 20 | 6e 69 6c 5d 20 65 6e 65 |] 3 nil |nil] ene|
|00001210| 72 67 69 7a 65 2d 69 6e | 73 65 72 74 2d 65 78 65 |rgize-in|sert-exe|
|00001220| 63 75 74 61 62 6c 65 2d | 74 61 72 67 65 74 20 23 |cutable-|target #|
|00001230| 5b 6e 69 6c 20 22 c0 c1 | c2 5c 22 87 22 20 5b 65 |[nil "..|.\"." [e|
|00001240| 6e 65 72 67 69 7a 65 2d | 69 6e 73 65 72 74 2d 73 |nergize-|insert-s|
|00001250| 6c 6f 74 73 20 6e 69 6c | 20 28 22 20 20 20 20 20 |lots nil| ("     |
|00001260| 20 45 78 65 63 75 74 61 | 62 6c 65 3a 20 3c 65 78 | Executa|ble: <ex|
|00001270| 65 63 75 74 61 62 6c 65 | 3e 22 20 22 20 20 20 42 |ecutable|>" "   B|
|00001280| 75 69 6c 64 20 43 6f 6d | 6d 61 6e 64 3a 20 6c 63 |uild Com|mand: lc|
|00001290| 63 20 2d 58 66 20 2d 58 | 65 7a 20 2d 6f 20 24 6f |c -Xf -X|ez -o $o|
|000012a0| 62 6a 65 63 74 20 3c 6f | 62 6a 65 63 74 2d 66 69 |bject <o|bject-fi|
|000012b0| 6c 65 3e 20 2e 2e 2e 22 | 29 5d 20 33 20 6e 69 6c |le> ..."|)] 3 nil|
|000012c0| 20 6e 69 6c 5d 20 65 6e | 65 72 67 69 7a 65 2d 69 | nil] en|ergize-i|
|000012d0| 6e 73 65 72 74 2d 6c 69 | 62 72 61 72 79 2d 74 61 |nsert-li|brary-ta|
|000012e0| 72 67 65 74 20 23 5b 6e | 69 6c 20 22 c0 c1 c2 5c |rget #[n|il "...\|
|000012f0| 22 87 22 20 5b 65 6e 65 | 72 67 69 7a 65 2d 69 6e |"." [ene|rgize-in|
|00001300| 73 65 72 74 2d 73 6c 6f | 74 73 20 6e 69 6c 20 28 |sert-slo|ts nil (|
|00001310| 22 20 20 20 20 20 20 20 | 20 20 4c 69 62 72 61 72 |"       |  Librar|
|00001320| 79 3a 20 3c 6c 69 62 72 | 61 72 79 3e 22 20 22 20 |y: <libr|ary>" " |
|00001330| 20 20 42 75 69 6c 64 20 | 43 6f 6d 6d 61 6e 64 3a |  Build |Command:|
|00001340| 20 65 6e 65 72 67 69 7a | 65 5f 61 72 20 2d 58 65 | energiz|e_ar -Xe|
|00001350| 7a 20 2d 72 65 6d 6f 76 | 65 20 2d 72 61 6e 6c 69 |z -remov|e -ranli|
|00001360| 62 20 63 6c 71 20 24 6f | 62 6a 65 63 74 20 5c 5c |b clq $o|bject \\|
|00001370| 22 20 22 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |" "     |        |
|00001380| 20 20 20 20 20 20 20 3c | 6f 62 6a 65 63 74 2d 66 |       <|object-f|
|00001390| 69 6c 65 3e 20 2e 2e 2e | 22 29 5d 20 33 20 6e 69 |ile> ...|")] 3 ni|
|000013a0| 6c 20 6e 69 6c 5d 20 65 | 6e 65 72 67 69 7a 65 2d |l nil] e|nergize-|
|000013b0| 69 6e 73 65 72 74 2d 63 | 6f 6c 6c 65 63 74 69 6f |insert-c|ollectio|
|000013c0| 6e 2d 74 61 72 67 65 74 | 20 23 5b 6e 69 6c 20 22 |n-target| #[nil "|
|000013d0| c0 c1 c2 5c 22 87 22 20 | 5b 65 6e 65 72 67 69 7a |...\"." |[energiz|
|000013e0| 65 2d 69 6e 73 65 72 74 | 2d 73 6c 6f 74 73 20 6e |e-insert|-slots n|
|000013f0| 69 6c 20 28 22 20 20 20 | 20 20 20 43 6f 6c 6c 65 |il ("   |   Colle|
|00001400| 63 74 69 6f 6e 3a 20 3c | 63 6f 6c 6c 65 63 74 69 |ction: <|collecti|
|00001410| 6f 6e 3e 22 20 22 20 20 | 20 42 75 69 6c 64 20 43 |on>" "  | Build C|
|00001420| 6f 6d 6d 61 6e 64 3a 20 | 65 6e 65 72 67 69 7a 65 |ommand: |energize|
|00001430| 5f 63 6f 6c 6c 65 63 74 | 20 2d 58 65 7a 20 2d 6f |_collect| -Xez -o|
|00001440| 20 24 6f 62 6a 65 63 74 | 20 3c 6f 62 6a 65 63 74 | $object| <object|
|00001450| 2d 66 69 6c 65 3e 20 2e | 2e 2e 22 29 5d 20 33 20 |-file> .|..")] 3 |
|00001460| 6e 69 6c 20 6e 69 6c 5d | 20 65 6e 65 72 67 69 7a |nil nil]| energiz|
|00001470| 65 2d 69 6e 73 65 72 74 | 2d 66 69 6c 65 2d 74 61 |e-insert|-file-ta|
|00001480| 72 67 65 74 20 23 5b 6e | 69 6c 20 22 c0 c1 c2 5c |rget #[n|il "...\|
|00001490| 22 87 22 20 5b 65 6e 65 | 72 67 69 7a 65 2d 69 6e |"." [ene|rgize-in|
|000014a0| 73 65 72 74 2d 73 6c 6f | 74 73 20 6e 69 6c 20 28 |sert-slo|ts nil (|
|000014b0| 22 20 20 20 20 20 46 69 | 6c 65 20 54 61 72 67 65 |"     Fi|le Targe|
|000014c0| 74 3a 20 3c 74 61 72 67 | 65 74 3e 22 20 22 20 20 |t: <targ|et>" "  |
|000014d0| 20 20 44 65 70 65 6e 64 | 65 6e 63 69 65 73 3a 20 |  Depend|encies: |
|000014e0| 3c 74 61 72 67 65 74 3e | 20 2e 2e 2e 22 20 22 20 |<target>| ..." " |
|000014f0| 20 20 42 75 69 6c 64 20 | 43 6f 6d 6d 61 6e 64 3a |  Build |Command:|
|00001500| 20 3c 73 68 65 6c 6c 2d | 63 6f 6d 6d 61 6e 64 3e | <shell-|command>|
|00001510| 22 29 5d 20 33 20 6e 69 | 6c 20 6e 69 6c 5d 20 65 |")] 3 ni|l nil] e|
|00001520| 6e 65 72 67 69 7a 65 2d | 69 6e 73 65 72 74 2d 74 |nergize-|insert-t|
|00001530| 61 72 67 65 74 2d 74 61 | 72 67 65 74 20 23 5b 6e |arget-ta|rget #[n|
|00001540| 69 6c 20 22 c0 c1 c2 5c | 22 87 22 20 5b 65 6e 65 |il "...\|"." [ene|
|00001550| 72 67 69 7a 65 2d 69 6e | 73 65 72 74 2d 73 6c 6f |rgize-in|sert-slo|
|00001560| 74 73 20 6e 69 6c 20 28 | 22 20 20 20 20 20 20 20 |ts nil (|"       |
|00001570| 20 20 20 54 61 72 67 65 | 74 3a 20 3c 74 61 72 67 |   Targe|t: <targ|
|00001580| 65 74 3e 22 20 22 20 20 | 20 20 44 65 70 65 6e 64 |et>" "  |  Depend|
|00001590| 65 6e 63 69 65 73 3a 20 | 3c 74 61 72 67 65 74 3e |encies: |<target>|
|000015a0| 20 2e 2e 2e 22 20 22 20 | 20 20 42 75 69 6c 64 20 | ..." " |  Build |
|000015b0| 43 6f 6d 6d 61 6e 64 3a | 20 3c 73 68 65 6c 6c 2d |Command:| <shell-|
|000015c0| 63 6f 6d 6d 61 6e 64 3e | 22 29 5d 20 33 20 6e 69 |command>|")] 3 ni|
|000015d0| 6c 20 6e 69 6c 5d 5d 20 | 32 29 0a 28 64 65 66 76 |l nil]] |2).(defv|
|000015e0| 61 72 20 65 6e 65 72 67 | 69 7a 65 2d 6d 61 70 20 |ar energ|ize-map |
|000015f0| 6e 69 6c 20 22 5c 0a 2a | 50 61 72 65 6e 74 20 6b |nil "\.*|Parent k|
|00001600| 65 79 6d 61 70 20 66 6f | 72 20 61 6c 6c 20 45 6e |eymap fo|r all En|
|00001610| 65 72 67 69 7a 65 20 62 | 75 66 66 65 72 73 22 29 |ergize b|uffers")|
|00001620| 0a 28 64 65 66 76 61 72 | 20 65 6e 65 72 67 69 7a |.(defvar| energiz|
|00001630| 65 2d 74 6f 70 2d 6c 65 | 76 65 6c 2d 6d 61 70 20 |e-top-le|vel-map |
|00001640| 6e 69 6c 20 22 5c 0a 2a | 4b 65 79 6d 61 70 20 66 |nil "\.*|Keymap f|
|00001650| 6f 72 20 74 68 65 20 45 | 6e 65 72 67 69 7a 65 20 |or the E|nergize |
|00001660| 74 6f 70 2d 6c 65 76 65 | 6c 20 62 75 66 66 65 72 |top-leve|l buffer|
|00001670| 22 29 0a 28 64 65 66 76 | 61 72 20 65 6e 65 72 67 |").(defv|ar energ|
|00001680| 69 7a 65 2d 64 65 62 75 | 67 67 65 72 2d 6d 61 70 |ize-debu|gger-map|
|00001690| 20 6e 69 6c 20 22 5c 0a | 2a 4b 65 79 6d 61 70 20 | nil "\.|*Keymap |
|000016a0| 66 6f 72 20 45 6e 65 72 | 67 69 7a 65 20 64 65 62 |for Ener|gize deb|
|000016b0| 75 67 67 65 72 20 62 75 | 66 66 65 72 73 22 29 0a |ugger bu|ffers").|
|000016c0| 28 64 65 66 76 61 72 20 | 65 6e 65 72 67 69 7a 65 |(defvar |energize|
|000016d0| 2d 62 72 65 61 6b 70 6f | 69 6e 74 2d 6d 61 70 20 |-breakpo|int-map |
|000016e0| 6e 69 6c 20 22 5c 0a 2a | 4b 65 79 6d 61 70 20 66 |nil "\.*|Keymap f|
|000016f0| 6f 72 20 45 6e 65 72 67 | 69 7a 65 20 62 72 65 61 |or Energ|ize brea|
|00001700| 6b 70 6f 69 6e 74 2d 6c | 69 73 74 73 22 29 0a 28 |kpoint-l|ists").(|
|00001710| 64 65 66 76 61 72 20 65 | 6e 65 72 67 69 7a 65 2d |defvar e|nergize-|
|00001720| 62 72 6f 77 73 65 72 2d | 6d 61 70 20 6e 69 6c 20 |browser-|map nil |
|00001730| 22 5c 0a 2a 4b 65 79 6d | 61 70 20 66 6f 72 20 45 |"\.*Keym|ap for E|
|00001740| 6e 65 72 67 69 7a 65 20 | 62 72 6f 77 73 65 72 20 |nergize |browser |
|00001750| 62 75 66 66 65 72 73 22 | 29 0a 28 64 65 66 76 61 |buffers"|).(defva|
|00001760| 72 20 65 6e 65 72 67 69 | 7a 65 2d 70 72 6f 6a 65 |r energi|ze-proje|
|00001770| 63 74 2d 6d 61 70 20 6e | 69 6c 20 22 5c 0a 2a 4b |ct-map n|il "\.*K|
|00001780| 65 79 6d 61 70 20 66 6f | 72 20 45 6e 65 72 67 69 |eymap fo|r Energi|
|00001790| 7a 65 20 70 72 6f 6a 65 | 63 74 20 62 75 66 66 65 |ze proje|ct buffe|
|000017a0| 72 73 22 29 0a 28 64 65 | 66 76 61 72 20 65 6e 65 |rs").(de|fvar ene|
|000017b0| 72 67 69 7a 65 2d 6e 6f | 2d 66 69 6c 65 2d 70 72 |rgize-no|-file-pr|
|000017c0| 6f 6a 65 63 74 2d 6d 61 | 70 20 6e 69 6c 20 22 5c |oject-ma|p nil "\|
|000017d0| 0a 2a 4b 65 79 6d 61 70 | 20 66 6f 72 20 45 6e 65 |.*Keymap| for Ene|
|000017e0| 72 67 69 7a 65 20 70 72 | 6f 6a 65 63 74 20 62 75 |rgize pr|oject bu|
|000017f0| 66 66 65 72 73 20 6e 6f | 74 20 61 73 73 6f 63 69 |ffers no|t associ|
|00001800| 61 74 65 64 20 77 69 74 | 68 20 61 20 66 69 6c 65 |ated wit|h a file|
|00001810| 22 29 0a 28 64 65 66 76 | 61 72 20 65 6e 65 72 67 |").(defv|ar energ|
|00001820| 69 7a 65 2d 73 6f 75 72 | 63 65 2d 6d 61 70 20 6e |ize-sour|ce-map n|
|00001830| 69 6c 20 22 5c 0a 2a 4b | 65 79 6d 61 70 20 66 6f |il "\.*K|eymap fo|
|00001840| 72 20 45 6e 65 72 67 69 | 7a 65 20 73 6f 75 72 63 |r Energi|ze sourc|
|00001850| 65 20 62 75 66 66 65 72 | 73 22 29 0a 28 64 65 66 |e buffer|s").(def|
|00001860| 76 61 72 20 65 6e 65 72 | 67 69 7a 65 2d 6d 6f 64 |var ener|gize-mod|
|00001870| 65 2d 68 6f 6f 6b 20 6e | 69 6c 20 22 5c 0a 48 6f |e-hook n|il "\.Ho|
|00001880| 6f 6b 20 63 61 6c 6c 65 | 64 20 77 68 65 6e 20 65 |ok calle|d when e|
|00001890| 61 63 68 20 65 6e 65 72 | 67 69 7a 65 20 62 75 66 |ach ener|gize buf|
|000018a0| 66 65 72 20 69 73 20 63 | 72 65 61 74 65 64 2e 22 |fer is c|reated."|
|000018b0| 29 0a 28 64 65 66 76 61 | 72 20 65 6e 65 72 67 69 |).(defva|r energi|
|000018c0| 7a 65 2d 74 6f 70 2d 6c | 65 76 65 6c 2d 6d 6f 64 |ze-top-l|evel-mod|
|000018d0| 65 2d 68 6f 6f 6b 20 6e | 69 6c 20 22 5c 0a 48 6f |e-hook n|il "\.Ho|
|000018e0| 6f 6b 20 63 61 6c 6c 65 | 64 20 77 68 65 6e 20 74 |ok calle|d when t|
|000018f0| 68 65 20 65 6e 65 72 67 | 69 7a 65 20 74 6f 70 2d |he energ|ize top-|
|00001900| 6c 65 76 65 6c 20 62 75 | 66 66 65 72 20 69 73 20 |level bu|ffer is |
|00001910| 63 72 65 61 74 65 64 2e | 22 29 0a 28 64 65 66 76 |created.|").(defv|
|00001920| 61 72 20 65 6e 65 72 67 | 69 7a 65 2d 70 72 6f 6a |ar energ|ize-proj|
|00001930| 65 63 74 2d 6d 6f 64 65 | 2d 68 6f 6f 6b 20 6e 69 |ect-mode|-hook ni|
|00001940| 6c 20 22 5c 0a 48 6f 6f | 6b 20 63 61 6c 6c 65 64 |l "\.Hoo|k called|
|00001950| 20 77 68 65 6e 20 61 6e | 20 45 6e 65 72 67 69 7a | when an| Energiz|
|00001960| 65 20 70 72 6f 6a 65 63 | 74 20 62 75 66 66 65 72 |e projec|t buffer|
|00001970| 20 69 73 20 63 72 65 61 | 74 65 64 2e 22 29 0a 28 | is crea|ted.").(|
|00001980| 64 65 66 76 61 72 20 65 | 6e 65 72 67 69 7a 65 2d |defvar e|nergize-|
|00001990| 6e 6f 2d 66 69 6c 65 2d | 70 72 6f 6a 65 63 74 2d |no-file-|project-|
|000019a0| 6d 6f 64 65 2d 68 6f 6f | 6b 20 6e 69 6c 20 22 5c |mode-hoo|k nil "\|
|000019b0| 0a 48 6f 6f 6b 20 63 61 | 6c 6c 65 64 20 77 68 65 |.Hook ca|lled whe|
|000019c0| 6e 20 61 6e 20 45 6e 65 | 72 67 69 7a 65 20 70 72 |n an Ene|rgize pr|
|000019d0| 6f 6a 65 63 74 20 62 75 | 66 66 65 72 20 77 69 74 |oject bu|ffer wit|
|000019e0| 68 20 6e 6f 20 66 69 6c | 65 20 69 73 20 63 72 65 |h no fil|e is cre|
|000019f0| 61 74 65 64 2e 22 29 0a | 28 64 65 66 76 61 72 20 |ated.").|(defvar |
|00001a00| 65 6e 65 72 67 69 7a 65 | 2d 62 72 65 61 6b 70 6f |energize|-breakpo|
|00001a10| 69 6e 74 2d 6d 6f 64 65 | 2d 68 6f 6f 6b 20 6e 69 |int-mode|-hook ni|
|00001a20| 6c 20 22 5c 0a 48 6f 6f | 6b 20 63 61 6c 6c 65 64 |l "\.Hoo|k called|
|00001a30| 20 77 68 65 6e 20 61 6e | 20 45 6e 65 72 67 69 7a | when an| Energiz|
|00001a40| 65 20 62 72 65 61 6b 70 | 6f 69 6e 74 2d 6c 69 73 |e breakp|oint-lis|
|00001a50| 74 20 62 75 66 66 65 72 | 20 69 73 20 63 72 65 61 |t buffer| is crea|
|00001a60| 74 65 64 2e 22 29 0a 28 | 64 65 66 76 61 72 20 65 |ted.").(|defvar e|
|00001a70| 6e 65 72 67 69 7a 65 2d | 62 72 6f 77 73 65 72 2d |nergize-|browser-|
|00001a80| 6d 6f 64 65 2d 68 6f 6f | 6b 20 6e 69 6c 20 22 5c |mode-hoo|k nil "\|
|00001a90| 0a 48 6f 6f 6b 20 63 61 | 6c 6c 65 64 20 77 68 65 |.Hook ca|lled whe|
|00001aa0| 6e 20 61 6e 20 45 6e 65 | 72 67 69 7a 65 20 62 72 |n an Ene|rgize br|
|00001ab0| 6f 77 73 65 72 20 62 75 | 66 66 65 72 20 69 73 20 |owser bu|ffer is |
|00001ac0| 63 72 65 61 74 65 64 2e | 22 29 0a 28 64 65 66 76 |created.|").(defv|
|00001ad0| 61 72 20 65 6e 65 72 67 | 69 7a 65 2d 6c 6f 67 2d |ar energ|ize-log-|
|00001ae0| 6d 6f 64 65 2d 68 6f 6f | 6b 20 6e 69 6c 20 22 5c |mode-hoo|k nil "\|
|00001af0| 0a 48 6f 6f 6b 20 63 61 | 6c 6c 65 64 20 77 68 65 |.Hook ca|lled whe|
|00001b00| 6e 20 61 6e 20 45 6e 65 | 72 67 69 7a 65 20 6c 6f |n an Ene|rgize lo|
|00001b10| 67 20 62 75 66 66 65 72 | 20 69 73 20 63 72 65 61 |g buffer| is crea|
|00001b20| 74 65 64 2e 22 29 0a 28 | 64 65 66 76 61 72 20 65 |ted.").(|defvar e|
|00001b30| 6e 65 72 67 69 7a 65 2d | 6d 61 6e 75 61 6c 2d 6d |nergize-|manual-m|
|00001b40| 6f 64 65 2d 68 6f 6f 6b | 20 6e 69 6c 20 22 5c 0a |ode-hook| nil "\.|
|00001b50| 48 6f 6f 6b 20 63 61 6c | 6c 65 64 20 77 68 65 6e |Hook cal|led when|
|00001b60| 20 61 6e 20 45 6e 65 72 | 67 69 7a 65 20 6d 61 6e | an Ener|gize man|
|00001b70| 75 61 6c 20 62 75 66 66 | 65 72 20 69 73 20 63 72 |ual buff|er is cr|
|00001b80| 65 61 74 65 64 2e 22 29 | 0a 28 64 65 66 76 61 72 |eated.")|.(defvar|
|00001b90| 20 65 6e 65 72 67 69 7a | 65 2d 73 6f 75 72 63 65 | energiz|e-source|
|00001ba0| 2d 6d 6f 64 65 2d 68 6f | 6f 6b 20 6e 69 6c 20 22 |-mode-ho|ok nil "|
|00001bb0| 5c 0a 48 6f 6f 6b 20 63 | 61 6c 6c 65 64 20 77 68 |\.Hook c|alled wh|
|00001bc0| 65 6e 20 61 6e 79 20 73 | 6f 75 72 63 65 20 62 75 |en any s|ource bu|
|00001bd0| 66 66 65 72 20 69 73 20 | 70 6c 61 63 65 64 20 69 |ffer is |placed i|
|00001be0| 6e 20 74 68 65 20 45 6e | 65 72 67 69 7a 65 20 6d |n the En|ergize m|
|00001bf0| 69 6e 6f 72 2d 6d 6f 64 | 65 2e 22 29 0a 28 62 79 |inor-mod|e.").(by|
|00001c00| 74 65 2d 63 6f 64 65 20 | 22 08 ac b2 c1 20 10 c2 |te-code |".... ..|
|00001c10| 08 c0 5c 22 88 c3 08 c4 | c5 23 88 c3 08 c6 c7 23 |..\"....|.#.....#|
|00001c20| 88 c3 08 c8 c9 23 88 c3 | 08 ca cb 23 88 c3 08 cc |.....#..|...#....|
|00001c30| cd 23 88 c3 08 ce cf 23 | 88 c3 08 d0 d1 23 88 0e |.#.....#|.....#..|
|00001c40| 12 ac f0 c1 20 16 12 c2 | 0e 12 d2 5c 22 88 d3 0e |.... ...|...\"...|
|00001c50| 12 08 5c 22 88 d4 0e 12 | 21 88 c3 0e 12 d5 d6 23 |..\"....|!......#|
|00001c60| 88 c3 0e 12 d7 d8 23 88 | c3 0e 12 d9 d8 23 88 c3 |......#.|.....#..|
|00001c70| 0e 12 da db 23 88 c3 0e | 12 dc d8 23 88 c3 0e 12 |....#...|...#....|
|00001c80| dd db 23 88 c3 0e 12 de | d8 23 88 c3 0e 12 df db |..#.....|.#......|
|00001c90| 23 88 c3 0e 12 e0 db 23 | 88 c3 0e 12 e1 e2 23 88 |#......#|......#.|
|00001ca0| c3 0e 12 e3 e4 23 88 c3 | 0e 12 e5 e6 23 88 c3 0e |.....#..|....#...|
|00001cb0| 12 e7 e8 23 88 0e 29 ac | ba c1 20 16 29 c2 0e 29 |...#..).|.. .)..)|
|00001cc0| e9 5c 22 88 d3 0e 29 08 | 5c 22 88 c3 0e 29 ea eb |.\"...).|\"...)..|
|00001cd0| 23 88 c3 0e 29 ec ed 23 | 88 c3 0e 29 ee ef 23 88 |#...)..#|...)..#.|
|00001ce0| c3 0e 29 f0 f1 23 88 c3 | 0e 29 f2 f3 23 88 c3 0e |..)..#..|.)..#...|
|00001cf0| 29 f4 f5 23 88 0e 36 ac | 90 c1 20 16 36 c2 0e 36 |)..#..6.|.. .6..6|
|00001d00| f6 5c 22 88 d3 0e 36 08 | 5c 22 88 0e 37 ac 90 c1 |.\"...6.|\"..7...|
|00001d10| 20 16 37 c2 0e 37 f7 5c | 22 88 d3 0e 37 08 5c 22 | .7..7.\|"...7.\"|
|00001d20| 88 0e 38 ac 90 c1 20 16 | 38 c2 0e 38 f8 5c 22 88 |..8... .|8..8.\".|
|00001d30| d3 0e 38 08 5c 22 88 0e | 39 ac 90 c1 20 16 39 c2 |..8.\"..|9... .9.|
|00001d40| 0e 39 f9 5c 22 88 d3 0e | 39 08 5c 22 88 c1 87 22 |.9.\"...|9.\"..."|
|00001d50| 20 5b 65 6e 65 72 67 69 | 7a 65 2d 6d 61 70 20 6d | [energi|ze-map m|
|00001d60| 61 6b 65 2d 73 70 61 72 | 73 65 2d 6b 65 79 6d 61 |ake-spar|se-keyma|
|00001d70| 70 20 73 65 74 2d 6b 65 | 79 6d 61 70 2d 6e 61 6d |p set-ke|ymap-nam|
|00001d80| 65 20 64 65 66 69 6e 65 | 2d 6b 65 79 20 22 03 06 |e define|-key "..|
|00001d90| 22 20 65 6e 65 72 67 69 | 7a 65 2d 66 69 6e 64 2d |" energi|ze-find-|
|00001da0| 70 72 6f 6a 65 63 74 20 | 22 03 02 05 22 20 65 6e |project |"..." en|
|00001db0| 65 72 67 69 7a 65 2d 62 | 72 6f 77 73 65 2d 65 72 |ergize-b|rowse-er|
|00001dc0| 72 6f 72 20 22 03 02 0c | 22 20 65 6e 65 72 67 69 |ror "...|" energi|
|00001dd0| 7a 65 2d 62 72 6f 77 73 | 65 2d 6c 61 6e 67 75 61 |ze-brows|e-langua|
|00001de0| 67 65 2d 65 6c 74 20 22 | 03 02 14 22 20 65 6e 65 |ge-elt "|..." ene|
|00001df0| 72 67 69 7a 65 2d 62 72 | 6f 77 73 65 2d 74 72 65 |rgize-br|owse-tre|
|00001e00| 65 20 22 03 02 03 22 20 | 65 6e 65 72 67 69 7a 65 |e "..." |energize|
|00001e10| 2d 62 72 6f 77 73 65 2d | 63 6c 61 73 73 20 22 c3 |-browse-|class ".|
|00001e20| 22 20 65 6e 65 72 67 69 | 7a 65 2d 64 65 66 61 75 |" energi|ze-defau|
|00001e30| 6c 74 2d 63 6f 6d 70 69 | 6c 65 2d 66 69 6c 65 20 |lt-compi|le-file |
|00001e40| 62 75 74 74 6f 6e 33 20 | 65 6e 65 72 67 69 7a 65 |button3 |energize|
|00001e50| 2d 70 6f 70 75 70 2d 6d | 65 6e 75 20 65 6e 65 72 |-popup-m|enu ener|
|00001e60| 67 69 7a 65 2d 74 6f 70 | 2d 6c 65 76 65 6c 2d 6d |gize-top|-level-m|
|00001e70| 61 70 20 73 65 74 2d 6b | 65 79 6d 61 70 2d 70 61 |ap set-k|eymap-pa|
|00001e80| 72 65 6e 74 20 73 75 70 | 70 72 65 73 73 2d 6b 65 |rent sup|press-ke|
|00001e90| 79 6d 61 70 20 22 3f 22 | 20 64 65 73 63 72 69 62 |ymap "?"| describ|
|00001ea0| 65 2d 6d 6f 64 65 20 22 | 20 22 20 65 6e 65 72 67 |e-mode "| " energ|
|00001eb0| 69 7a 65 2d 74 6f 70 2d | 6e 65 78 74 2d 70 72 6f |ize-top-|next-pro|
|00001ec0| 6a 65 63 74 20 22 6e 22 | 20 22 70 22 20 65 6e 65 |ject "n"| "p" ene|
|00001ed0| 72 67 69 7a 65 2d 74 6f | 70 2d 70 72 65 76 2d 70 |rgize-to|p-prev-p|
|00001ee0| 72 6f 6a 65 63 74 20 22 | 4e 22 20 22 50 22 20 22 |roject "|N" "P" "|
|00001ef0| 09 22 20 28 73 68 69 66 | 74 20 74 61 62 29 20 28 |." (shif|t tab) (|
|00001f00| 63 6f 6e 74 72 6f 6c 20 | 49 29 20 22 51 22 20 64 |control |I) "Q" d|
|00001f10| 69 73 63 6f 6e 6e 65 63 | 74 2d 66 72 6f 6d 2d 65 |isconnec|t-from-e|
|00001f20| 6e 65 72 67 69 7a 65 2d | 71 75 65 72 79 20 22 64 |nergize-|query "d|
|00001f30| 22 20 65 6e 65 72 67 69 | 7a 65 2d 74 6f 70 2d 64 |" energi|ze-top-d|
|00001f40| 65 62 75 67 20 22 04 22 | 20 65 6e 65 72 67 69 7a |ebug "."| energiz|
|00001f50| 65 2d 74 6f 70 2d 64 65 | 6c 65 74 65 2d 70 72 6f |e-top-de|lete-pro|
|00001f60| 6a 65 63 74 20 22 65 22 | 20 65 6e 65 72 67 69 7a |ject "e"| energiz|
|00001f70| 65 2d 74 6f 70 2d 65 64 | 69 74 2d 70 72 6f 6a 65 |e-top-ed|it-proje|
|00001f80| 63 74 20 65 6e 65 72 67 | 69 7a 65 2d 70 72 6f 6a |ct energ|ize-proj|
|00001f90| 65 63 74 2d 6d 61 70 20 | 22 03 09 22 20 65 6e 65 |ect-map |".." ene|
|00001fa0| 72 67 69 7a 65 2d 69 6d | 70 6f 72 74 2d 66 69 6c |rgize-im|port-fil|
|00001fb0| 65 20 22 03 05 22 20 65 | 6e 65 72 67 69 7a 65 2d |e ".." e|nergize-|
|00001fc0| 70 72 6f 6a 65 63 74 2d | 65 64 69 74 2d 66 69 6c |project-|edit-fil|
|00001fd0| 65 20 22 03 13 01 22 20 | 65 6e 65 72 67 69 7a 65 |e "..." |energize|
|00001fe0| 2d 70 72 6f 6a 65 63 74 | 2d 73 6f 72 74 2d 61 6c |-project|-sort-al|
|00001ff0| 70 68 61 20 22 03 13 0c | 22 20 65 6e 65 72 67 69 |pha "...|" energi|
|00002000| 7a 65 2d 70 72 6f 6a 65 | 63 74 2d 73 6f 72 74 2d |ze-proje|ct-sort-|
|00002010| 6c 69 6e 6b 20 22 03 16 | 0e 22 20 65 6e 65 72 67 |link "..|." energ|
|00002020| 69 7a 65 2d 70 72 6f 6a | 65 63 74 2d 76 69 65 77 |ize-proj|ect-view|
|00002030| 2d 6e 61 6d 65 73 20 22 | 03 16 03 22 20 65 6e 65 |-names "|..." ene|
|00002040| 72 67 69 7a 65 2d 70 72 | 6f 6a 65 63 74 2d 76 69 |rgize-pr|oject-vi|
|00002050| 65 77 2d 6f 70 74 69 6f | 6e 73 20 65 6e 65 72 67 |ew-optio|ns energ|
|00002060| 69 7a 65 2d 6e 6f 2d 66 | 69 6c 65 2d 70 72 6f 6a |ize-no-f|ile-proj|
|00002070| 65 63 74 2d 6d 61 70 20 | 65 6e 65 72 67 69 7a 65 |ect-map |energize|
|00002080| 2d 62 72 65 61 6b 70 6f | 69 6e 74 2d 6d 61 70 20 |-breakpo|int-map |
|00002090| 65 6e 65 72 67 69 7a 65 | 2d 62 72 6f 77 73 65 72 |energize|-browser|
|000020a0| 2d 6d 61 70 20 65 6e 65 | 72 67 69 7a 65 2d 73 6f |-map ene|rgize-so|
|000020b0| 75 72 63 65 2d 6d 61 70 | 5d 20 34 29 0a 28 64 65 |urce-map|] 4).(de|
|000020c0| 66 76 61 72 20 65 6e 65 | 72 67 69 7a 65 2d 6d 65 |fvar ene|rgize-me|
|000020d0| 6e 75 2d 73 74 61 74 65 | 20 6e 69 6c 20 22 5c 0a |nu-state| nil "\.|
|000020e0| 53 74 61 74 65 20 6f 66 | 20 74 68 65 20 65 6e 65 |State of| the ene|
|000020f0| 72 67 69 7a 65 20 6d 65 | 6e 75 20 69 74 65 6d 73 |rgize me|nu items|
|00002100| 20 6f 66 20 74 68 65 20 | 62 75 66 66 65 72 2e 20 | of the |buffer. |
|00002110| 20 0a 41 75 74 6f 6d 61 | 74 69 63 61 6c 6c 79 20 | .Automa|tically |
|00002120| 75 70 64 61 74 65 64 20 | 62 79 20 74 68 65 20 6b |updated |by the k|
|00002130| 65 72 6e 65 6c 20 77 68 | 65 6e 20 74 68 65 20 73 |ernel wh|en the s|
|00002140| 74 61 74 65 20 63 68 61 | 6e 67 65 73 22 29 0a 28 |tate cha|nges").(|
|00002150| 64 65 66 76 61 72 20 65 | 6e 65 72 67 69 7a 65 2d |defvar e|nergize-|
|00002160| 64 65 66 61 75 6c 74 2d | 6d 65 6e 75 2d 73 74 61 |default-|menu-sta|
|00002170| 74 65 20 6e 69 6c 20 22 | 5c 0a 53 74 61 74 65 20 |te nil "|\.State |
|00002180| 6f 66 20 74 68 65 20 65 | 6e 65 72 67 69 7a 65 20 |of the e|nergize |
|00002190| 64 65 66 61 75 6c 74 20 | 6d 65 6e 75 20 69 74 65 |default |menu ite|
|000021a0| 6d 73 2e 20 20 0a 41 75 | 74 6f 6d 61 74 69 63 61 |ms.  .Au|tomatica|
|000021b0| 6c 6c 79 20 75 70 64 61 | 74 65 64 20 62 79 20 74 |lly upda|ted by t|
|000021c0| 68 65 20 6b 65 72 6e 65 | 6c 20 77 68 65 6e 20 74 |he kerne|l when t|
|000021d0| 68 65 20 73 74 61 74 65 | 20 63 68 61 6e 67 65 73 |he state| changes|
|000021e0| 22 29 0a 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |").(byte|-code ".|
|000021f0| c1 4d 88 c2 c3 4d 88 c4 | c5 c6 c7 23 88 c4 c8 c6 |.M...M..|...#....|
|00002200| c7 23 88 c4 c9 c6 c7 23 | 88 c4 ca c6 c7 23 88 c4 |.#.....#|.....#..|
|00002210| cb c6 c7 23 88 c4 cc c6 | c7 23 87 22 20 5b 65 6e |...#....|.#." [en|
|00002220| 65 72 67 69 7a 65 2d 6d | 6f 64 65 2d 69 6e 74 65 |ergize-m|ode-inte|
|00002230| 72 6e 61 6c 20 23 5b 6e | 69 6c 20 22 c0 c1 21 88 |rnal #[n|il "..!.|
|00002240| c2 c1 c3 c4 23 88 c0 c5 | 21 88 c6 15 c0 c7 21 88 |....#...|!.....!.|
|00002250| c8 16 07 c0 c9 21 88 c4 | 16 09 c0 ca 21 88 cb cc |.....!..|....!...|
|00002260| 21 87 22 20 5b 6d 61 6b | 65 2d 6c 6f 63 61 6c 2d |!." [mak|e-local-|
|00002270| 76 61 72 69 61 62 6c 65 | 20 77 72 69 74 65 2d 66 |variable| write-f|
|00002280| 69 6c 65 2d 64 61 74 61 | 2d 68 6f 6f 6b 73 20 61 |ile-data|-hooks a|
|00002290| 64 64 2d 68 6f 6f 6b 20 | 65 6e 65 72 67 69 7a 65 |dd-hook |energize|
|000022a0| 2d 77 72 69 74 65 2d 64 | 61 74 61 2d 68 6f 6f 6b |-write-d|ata-hook|
|000022b0| 20 74 20 72 65 76 65 72 | 74 2d 62 75 66 66 65 72 | t rever|t-buffer|
|000022c0| 2d 69 6e 73 65 72 74 2d | 66 69 6c 65 2d 63 6f 6e |-insert-|file-con|
|000022d0| 74 65 6e 74 73 2d 66 75 | 6e 63 74 69 6f 6e 20 65 |tents-fu|nction e|
|000022e0| 6e 65 72 67 69 7a 65 2d | 72 65 76 65 72 74 2d 62 |nergize-|revert-b|
|000022f0| 75 66 66 65 72 2d 69 6e | 73 65 72 74 2d 66 69 6c |uffer-in|sert-fil|
|00002300| 65 2d 63 6f 6e 74 65 6e | 74 73 2d 68 6f 6f 6b 20 |e-conten|ts-hook |
|00002310| 6b 69 6c 6c 2d 62 75 66 | 66 65 72 2d 68 6f 6f 6b |kill-buf|fer-hook|
|00002320| 20 65 6e 65 72 67 69 7a | 65 2d 6b 69 6c 6c 2d 62 | energiz|e-kill-b|
|00002330| 75 66 66 65 72 2d 68 6f | 6f 6b 20 72 65 71 75 69 |uffer-ho|ok requi|
|00002340| 72 65 2d 66 69 6e 61 6c | 2d 6e 65 77 6c 69 6e 65 |re-final|-newline|
|00002350| 20 65 6e 65 72 67 69 7a | 65 2d 6d 65 6e 75 2d 73 | energiz|e-menu-s|
|00002360| 74 61 74 65 20 72 75 6e | 2d 68 6f 6f 6b 73 20 65 |tate run|-hooks e|
|00002370| 6e 65 72 67 69 7a 65 2d | 6d 6f 64 65 2d 68 6f 6f |nergize-|mode-hoo|
|00002380| 6b 5d 20 34 5d 20 65 6e | 65 72 67 69 7a 65 2d 6e |k] 4] en|ergize-n|
|00002390| 6f 6e 2d 66 69 6c 65 2d | 6d 6f 64 65 2d 69 6e 74 |on-file-|mode-int|
|000023a0| 65 72 6e 61 6c 20 23 5b | 6e 69 6c 20 22 08 ac 83 |ernal #[|nil "...|
|000023b0| c1 20 10 c2 c3 21 c4 4c | 88 c5 87 22 20 5b 62 75 |. ...!.L|..." [bu|
|000023c0| 66 66 65 72 2d 66 69 6c | 65 2d 6e 61 6d 65 20 62 |ffer-fil|e-name b|
|000023d0| 75 66 66 65 72 2d 6e 61 | 6d 65 20 6d 61 6b 65 2d |uffer-na|me make-|
|000023e0| 6c 6f 63 61 6c 2d 76 61 | 72 69 61 62 6c 65 20 76 |local-va|riable v|
|000023f0| 65 72 73 69 6f 6e 2d 63 | 6f 6e 74 72 6f 6c 20 6e |ersion-c|ontrol n|
|00002400| 65 76 65 72 20 6e 69 6c | 5d 20 32 5d 20 70 75 74 |ever nil|] 2] put|
|00002410| 20 65 6e 65 72 67 69 7a | 65 2d 74 6f 70 2d 6c 65 | energiz|e-top-le|
|00002420| 76 65 6c 2d 6d 6f 64 65 | 20 6d 6f 64 65 2d 63 6c |vel-mode| mode-cl|
|00002430| 61 73 73 20 73 70 65 63 | 69 61 6c 20 65 6e 65 72 |ass spec|ial ener|
|00002440| 67 69 7a 65 2d 70 72 6f | 6a 65 63 74 2d 6d 6f 64 |gize-pro|ject-mod|
|00002450| 65 20 65 6e 65 72 67 69 | 7a 65 2d 6e 6f 2d 66 69 |e energi|ze-no-fi|
|00002460| 6c 65 2d 70 72 6f 6a 65 | 63 74 2d 6d 6f 64 65 20 |le-proje|ct-mode |
|00002470| 65 6e 65 72 67 69 7a 65 | 2d 62 72 65 61 6b 70 6f |energize|-breakpo|
|00002480| 69 6e 74 2d 6d 6f 64 65 | 20 65 6e 65 72 67 69 7a |int-mode| energiz|
|00002490| 65 2d 62 72 6f 77 73 65 | 72 2d 6d 6f 64 65 20 65 |e-browse|r-mode e|
|000024a0| 6e 65 72 67 69 7a 65 2d | 6c 6f 67 2d 6d 6f 64 65 |nergize-|log-mode|
|000024b0| 5d 20 34 29 0a 28 66 73 | 65 74 20 27 65 6e 65 72 |] 4).(fs|et 'ener|
|000024c0| 67 69 7a 65 2d 74 6f 70 | 2d 6c 65 76 65 6c 2d 6d |gize-top|-level-m|
|000024d0| 6f 64 65 20 23 5b 6e 69 | 6c 20 22 c0 20 88 c1 5c |ode #[ni|l ". ..\|
|000024e0| 6e 21 88 c3 14 c5 16 06 | c7 20 88 0e 08 c9 9a ab |n!......|. ......|
|000024f0| 86 ca c8 21 cb 4c 88 cc | cd 21 87 22 20 5b 65 6e |...!.L..|.!." [en|
|00002500| 65 72 67 69 7a 65 2d 6d | 6f 64 65 2d 69 6e 74 65 |ergize-m|ode-inte|
|00002510| 72 6e 61 6c 20 75 73 65 | 2d 6c 6f 63 61 6c 2d 6d |rnal use|-local-m|
|00002520| 61 70 20 65 6e 65 72 67 | 69 7a 65 2d 74 6f 70 2d |ap energ|ize-top-|
|00002530| 6c 65 76 65 6c 2d 6d 61 | 70 20 65 6e 65 72 67 69 |level-ma|p energi|
|00002540| 7a 65 2d 74 6f 70 2d 6c | 65 76 65 6c 2d 6d 6f 64 |ze-top-l|evel-mod|
|00002550| 65 20 6d 61 6a 6f 72 2d | 6d 6f 64 65 20 22 45 6e |e major-|mode "En|
|00002560| 65 72 67 69 7a 65 22 20 | 6d 6f 64 65 2d 6e 61 6d |ergize" |mode-nam|
|00002570| 65 20 65 6e 65 72 67 69 | 7a 65 2d 6e 6f 6e 2d 66 |e energi|ze-non-f|
|00002580| 69 6c 65 2d 6d 6f 64 65 | 2d 69 6e 74 65 72 6e 61 |ile-mode|-interna|
|00002590| 6c 20 66 72 61 6d 65 2d | 74 69 74 6c 65 2d 66 6f |l frame-|title-fo|
|000025a0| 72 6d 61 74 20 22 25 53 | 3a 20 25 62 22 20 6d 61 |rmat "%S|: %b" ma|
|000025b0| 6b 65 2d 6c 6f 63 61 6c | 2d 76 61 72 69 61 62 6c |ke-local|-variabl|
|000025c0| 65 20 22 25 53 3a 20 54 | 6f 70 2d 4c 65 76 65 6c |e "%S: T|op-Level|
|000025d0| 22 20 72 75 6e 2d 68 6f | 6f 6b 73 20 65 6e 65 72 |" run-ho|oks ener|
|000025e0| 67 69 7a 65 2d 74 6f 70 | 2d 6c 65 76 65 6c 2d 6d |gize-top|-level-m|
|000025f0| 6f 64 65 2d 68 6f 6f 6b | 5d 20 32 20 22 5c 0a 4d |ode-hook|] 2 "\.M|
|00002600| 61 6a 6f 72 20 6d 6f 64 | 65 20 66 6f 72 20 74 68 |ajor mod|e for th|
|00002610| 65 20 45 6e 65 72 67 69 | 7a 65 20 74 6f 70 2d 6c |e Energi|ze top-l|
|00002620| 65 76 65 6c 20 62 75 66 | 66 65 72 2e 0a 49 6e 20 |evel buf|fer..In |
|00002630| 61 64 64 69 74 69 6f 6e | 20 74 6f 20 6e 6f 72 6d |addition| to norm|
|00002640| 61 6c 20 63 75 72 73 6f | 72 2d 6d 6f 74 69 6f 6e |al curso|r-motion|
|00002650| 20 63 6f 6d 6d 61 6e 64 | 73 2c 20 74 68 65 20 66 | command|s, the f|
|00002660| 6f 6c 6c 6f 77 69 6e 67 | 20 6b 65 79 73 20 61 72 |ollowing| keys ar|
|00002670| 65 20 62 6f 75 6e 64 3a | 0a 5c 5c 7b 65 6e 65 72 |e bound:|.\\{ener|
|00002680| 67 69 7a 65 2d 74 6f 70 | 2d 6c 65 76 65 6c 2d 6d |gize-top|-level-m|
|00002690| 61 70 7d 22 20 6e 69 6c | 5d 29 0a 28 66 73 65 74 |ap}" nil|]).(fset|
|000026a0| 20 27 65 6e 65 72 67 69 | 7a 65 2d 70 72 6f 6a 65 | 'energi|ze-proje|
|000026b0| 63 74 2d 6d 6f 64 65 20 | 23 5b 6e 69 6c 20 22 c0 |ct-mode |#[nil ".|
|000026c0| 20 88 c1 5c 6e 21 88 c3 | 14 c5 16 06 c7 20 41 c8 | ..\n!..|..... A.|
|000026d0| 57 ab 83 c9 20 88 ca cb | 21 87 22 20 5b 65 6e 65 |W... ...|!." [ene|
|000026e0| 72 67 69 7a 65 2d 6d 6f | 64 65 2d 69 6e 74 65 72 |rgize-mo|de-inter|
|000026f0| 6e 61 6c 20 75 73 65 2d | 6c 6f 63 61 6c 2d 6d 61 |nal use-|local-ma|
|00002700| 70 20 65 6e 65 72 67 69 | 7a 65 2d 70 72 6f 6a 65 |p energi|ze-proje|
|00002710| 63 74 2d 6d 61 70 20 65 | 6e 65 72 67 69 7a 65 2d |ct-map e|nergize-|
|00002720| 70 72 6f 6a 65 63 74 2d | 6d 6f 64 65 20 6d 61 6a |project-|mode maj|
|00002730| 6f 72 2d 6d 6f 64 65 20 | 22 50 72 6f 6a 65 63 74 |or-mode |"Project|
|00002740| 22 20 6d 6f 64 65 2d 6e | 61 6d 65 20 65 6e 65 72 |" mode-n|ame ener|
|00002750| 67 69 7a 65 2d 70 72 6f | 74 6f 63 6f 6c 2d 6c 65 |gize-pro|tocol-le|
|00002760| 76 65 6c 20 38 20 65 6e | 65 72 67 69 7a 65 2d 6e |vel 8 en|ergize-n|
|00002770| 6f 6e 2d 66 69 6c 65 2d | 6d 6f 64 65 2d 69 6e 74 |on-file-|mode-int|
|00002780| 65 72 6e 61 6c 20 72 75 | 6e 2d 68 6f 6f 6b 73 20 |ernal ru|n-hooks |
|00002790| 65 6e 65 72 67 69 7a 65 | 2d 70 72 6f 6a 65 63 74 |energize|-project|
|000027a0| 2d 6d 6f 64 65 2d 68 6f | 6f 6b 5d 20 32 20 22 5c |-mode-ho|ok] 2 "\|
|000027b0| 0a 4d 61 6a 6f 72 20 6d | 6f 64 65 20 66 6f 72 20 |.Major m|ode for |
|000027c0| 74 68 65 20 45 6e 65 72 | 67 69 7a 65 20 50 72 6f |the Ener|gize Pro|
|000027d0| 6a 65 63 74 20 62 75 66 | 66 65 72 73 2e 0a 49 6e |ject buf|fers..In|
|000027e0| 20 61 64 64 69 74 69 6f | 6e 20 74 6f 20 74 68 65 | additio|n to the|
|000027f0| 20 6e 6f 72 6d 61 6c 20 | 65 64 69 74 69 6e 67 20 | normal |editing |
|00002800| 63 6f 6d 6d 61 6e 64 73 | 2c 20 74 68 65 20 66 6f |commands|, the fo|
|00002810| 6c 6c 6f 77 69 6e 67 20 | 6b 65 79 73 20 61 72 65 |llowing |keys are|
|00002820| 20 62 6f 75 6e 64 3a 0a | 5c 5c 7b 65 6e 65 72 67 | bound:.|\\{energ|
|00002830| 69 7a 65 2d 70 72 6f 6a | 65 63 74 2d 6d 61 70 7d |ize-proj|ect-map}|
|00002840| 22 20 6e 69 6c 5d 29 0a | 28 66 73 65 74 20 27 65 |" nil]).|(fset 'e|
|00002850| 6e 65 72 67 69 7a 65 2d | 6e 6f 2d 66 69 6c 65 2d |nergize-|no-file-|
|00002860| 70 72 6f 6a 65 63 74 2d | 6d 6f 64 65 20 23 5b 6e |project-|mode #[n|
|00002870| 69 6c 20 22 c0 20 88 c1 | 5c 6e 21 88 c3 14 c5 16 |il ". ..|\n!.....|
|00002880| 06 c7 20 88 c8 c9 21 87 | 22 20 5b 65 6e 65 72 67 |.. ...!.|" [energ|
|00002890| 69 7a 65 2d 6d 6f 64 65 | 2d 69 6e 74 65 72 6e 61 |ize-mode|-interna|
|000028a0| 6c 20 75 73 65 2d 6c 6f | 63 61 6c 2d 6d 61 70 20 |l use-lo|cal-map |
|000028b0| 65 6e 65 72 67 69 7a 65 | 2d 6e 6f 2d 66 69 6c 65 |energize|-no-file|
|000028c0| 2d 70 72 6f 6a 65 63 74 | 2d 6d 61 70 20 65 6e 65 |-project|-map ene|
|000028d0| 72 67 69 7a 65 2d 6e 6f | 2d 66 69 6c 65 2d 70 72 |rgize-no|-file-pr|
|000028e0| 6f 6a 65 63 74 2d 6d 6f | 64 65 20 6d 61 6a 6f 72 |oject-mo|de major|
|000028f0| 2d 6d 6f 64 65 20 22 4e | 6f 46 69 6c 65 50 72 6f |-mode "N|oFilePro|
|00002900| 6a 65 63 74 22 20 6d 6f | 64 65 2d 6e 61 6d 65 20 |ject" mo|de-name |
|00002910| 65 6e 65 72 67 69 7a 65 | 2d 6e 6f 6e 2d 66 69 6c |energize|-non-fil|
|00002920| 65 2d 6d 6f 64 65 2d 69 | 6e 74 65 72 6e 61 6c 20 |e-mode-i|nternal |
|00002930| 72 75 6e 2d 68 6f 6f 6b | 73 20 65 6e 65 72 67 69 |run-hook|s energi|
|00002940| 7a 65 2d 6e 6f 2d 66 69 | 6c 65 2d 70 72 6f 6a 65 |ze-no-fi|le-proje|
|00002950| 63 74 2d 6d 6f 64 65 2d | 68 6f 6f 6b 5d 20 32 20 |ct-mode-|hook] 2 |
|00002960| 22 5c 0a 4d 61 6a 6f 72 | 20 6d 6f 64 65 20 66 6f |"\.Major| mode fo|
|00002970| 72 20 74 68 65 20 45 6e | 65 72 67 69 7a 65 20 50 |r the En|ergize P|
|00002980| 72 6f 6a 65 63 74 20 62 | 75 66 66 65 72 73 20 6e |roject b|uffers n|
|00002990| 6f 74 20 61 73 73 6f 63 | 69 61 74 65 64 20 77 69 |ot assoc|iated wi|
|000029a0| 74 68 20 61 20 66 69 6c | 65 2e 0a 49 6e 20 61 64 |th a fil|e..In ad|
|000029b0| 64 69 74 69 6f 6e 20 74 | 6f 20 74 68 65 20 6e 6f |dition t|o the no|
|000029c0| 72 6d 61 6c 20 65 64 69 | 74 69 6e 67 20 63 6f 6d |rmal edi|ting com|
|000029d0| 6d 61 6e 64 73 2c 20 74 | 68 65 20 66 6f 6c 6c 6f |mands, t|he follo|
|000029e0| 77 69 6e 67 20 6b 65 79 | 73 20 61 72 65 20 62 6f |wing key|s are bo|
|000029f0| 75 6e 64 3a 0a 5c 5c 7b | 65 6e 65 72 67 69 7a 65 |und:.\\{|energize|
|00002a00| 2d 6e 6f 2d 66 69 6c 65 | 2d 70 72 6f 6a 65 63 74 |-no-file|-project|
|00002a10| 2d 6d 61 70 7d 22 20 6e | 69 6c 5d 29 0a 28 66 73 |-map}" n|il]).(fs|
|00002a20| 65 74 20 27 65 6e 65 72 | 67 69 7a 65 2d 62 72 65 |et 'ener|gize-bre|
|00002a30| 61 6b 70 6f 69 6e 74 2d | 6d 6f 64 65 20 23 5b 6e |akpoint-|mode #[n|
|00002a40| 69 6c 20 22 c0 20 88 c1 | 5c 6e 21 88 c3 14 c5 16 |il ". ..|\n!.....|
|00002a50| 06 c7 20 88 c8 c9 21 87 | 22 20 5b 65 6e 65 72 67 |.. ...!.|" [energ|
|00002a60| 69 7a 65 2d 6d 6f 64 65 | 2d 69 6e 74 65 72 6e 61 |ize-mode|-interna|
|00002a70| 6c 20 75 73 65 2d 6c 6f | 63 61 6c 2d 6d 61 70 20 |l use-lo|cal-map |
|00002a80| 65 6e 65 72 67 69 7a 65 | 2d 62 72 65 61 6b 70 6f |energize|-breakpo|
|00002a90| 69 6e 74 2d 6d 61 70 20 | 65 6e 65 72 67 69 7a 65 |int-map |energize|
|00002aa0| 2d 62 72 65 61 6b 70 6f | 69 6e 74 2d 6d 6f 64 65 |-breakpo|int-mode|
|00002ab0| 20 6d 61 6a 6f 72 2d 6d | 6f 64 65 20 22 42 72 65 | major-m|ode "Bre|
|00002ac0| 61 6b 70 6f 69 6e 74 22 | 20 6d 6f 64 65 2d 6e 61 |akpoint"| mode-na|
|00002ad0| 6d 65 20 65 6e 65 72 67 | 69 7a 65 2d 6e 6f 6e 2d |me energ|ize-non-|
|00002ae0| 66 69 6c 65 2d 6d 6f 64 | 65 2d 69 6e 74 65 72 6e |file-mod|e-intern|
|00002af0| 61 6c 20 72 75 6e 2d 68 | 6f 6f 6b 73 20 65 6e 65 |al run-h|ooks ene|
|00002b00| 72 67 69 7a 65 2d 62 72 | 65 61 6b 70 6f 69 6e 74 |rgize-br|eakpoint|
|00002b10| 2d 6d 6f 64 65 2d 68 6f | 6f 6b 5d 20 32 20 22 5c |-mode-ho|ok] 2 "\|
|00002b20| 0a 4d 61 6a 6f 72 20 6d | 6f 64 65 20 66 6f 72 20 |.Major m|ode for |
|00002b30| 74 68 65 20 45 6e 65 72 | 67 69 7a 65 20 42 72 65 |the Ener|gize Bre|
|00002b40| 61 6b 70 6f 69 6e 74 2d | 6c 69 73 74 20 62 75 66 |akpoint-|list buf|
|00002b50| 66 65 72 73 2e 0a 49 6e | 20 61 64 64 69 74 69 6f |fers..In| additio|
|00002b60| 6e 20 74 6f 20 74 68 65 | 20 6e 6f 72 6d 61 6c 20 |n to the| normal |
|00002b70| 65 64 69 74 69 6e 67 20 | 63 6f 6d 6d 61 6e 64 73 |editing |commands|
|00002b80| 2c 20 74 68 65 20 66 6f | 6c 6c 6f 77 69 6e 67 20 |, the fo|llowing |
|00002b90| 6b 65 79 73 20 61 72 65 | 20 62 6f 75 6e 64 3a 0a |keys are| bound:.|
|00002ba0| 5c 5c 7b 65 6e 65 72 67 | 69 7a 65 2d 62 72 65 61 |\\{energ|ize-brea|
|00002bb0| 6b 70 6f 69 6e 74 2d 6d | 61 70 7d 22 20 6e 69 6c |kpoint-m|ap}" nil|
|00002bc0| 5d 29 0a 28 66 73 65 74 | 20 27 65 6e 65 72 67 69 |]).(fset| 'energi|
|00002bd0| 7a 65 2d 62 72 6f 77 73 | 65 72 2d 6d 6f 64 65 20 |ze-brows|er-mode |
|00002be0| 23 5b 6e 69 6c 20 22 c0 | 20 88 c1 5c 6e 21 88 c3 |#[nil ".| ..\n!..|
|00002bf0| 14 c5 16 06 c7 20 88 c8 | c9 21 87 22 20 5b 65 6e |..... ..|.!." [en|
|00002c00| 65 72 67 69 7a 65 2d 6d | 6f 64 65 2d 69 6e 74 65 |ergize-m|ode-inte|
|00002c10| 72 6e 61 6c 20 75 73 65 | 2d 6c 6f 63 61 6c 2d 6d |rnal use|-local-m|
|00002c20| 61 70 20 65 6e 65 72 67 | 69 7a 65 2d 62 72 6f 77 |ap energ|ize-brow|
|00002c30| 73 65 72 2d 6d 61 70 20 | 65 6e 65 72 67 69 7a 65 |ser-map |energize|
|00002c40| 2d 62 72 6f 77 73 65 72 | 2d 6d 6f 64 65 20 6d 61 |-browser|-mode ma|
|00002c50| 6a 6f 72 2d 6d 6f 64 65 | 20 22 42 72 6f 77 73 65 |jor-mode| "Browse|
|00002c60| 72 22 20 6d 6f 64 65 2d | 6e 61 6d 65 20 65 6e 65 |r" mode-|name ene|
|00002c70| 72 67 69 7a 65 2d 6e 6f | 6e 2d 66 69 6c 65 2d 6d |rgize-no|n-file-m|
|00002c80| 6f 64 65 2d 69 6e 74 65 | 72 6e 61 6c 20 72 75 6e |ode-inte|rnal run|
|00002c90| 2d 68 6f 6f 6b 73 20 65 | 6e 65 72 67 69 7a 65 2d |-hooks e|nergize-|
|00002ca0| 62 72 6f 77 73 65 72 2d | 6d 6f 64 65 2d 68 6f 6f |browser-|mode-hoo|
|00002cb0| 6b 5d 20 32 20 22 5c 0a | 4d 61 6a 6f 72 20 6d 6f |k] 2 "\.|Major mo|
|00002cc0| 64 65 20 66 6f 72 20 74 | 68 65 20 45 6e 65 72 67 |de for t|he Energ|
|00002cd0| 69 7a 65 20 42 72 6f 77 | 73 65 72 20 62 75 66 66 |ize Brow|ser buff|
|00002ce0| 65 72 73 2e 0a 49 6e 20 | 61 64 64 69 74 69 6f 6e |ers..In |addition|
|00002cf0| 20 74 6f 20 74 68 65 20 | 6e 6f 72 6d 61 6c 20 65 | to the |normal e|
|00002d00| 64 69 74 69 6e 67 20 63 | 6f 6d 6d 61 6e 64 73 2c |diting c|ommands,|
|00002d10| 20 74 68 65 20 66 6f 6c | 6c 6f 77 69 6e 67 20 6b | the fol|lowing k|
|00002d20| 65 79 73 20 61 72 65 20 | 62 6f 75 6e 64 3a 0a 5c |eys are |bound:.\|
|00002d30| 5c 7b 65 6e 65 72 67 69 | 7a 65 2d 62 72 6f 77 73 |\{energi|ze-brows|
|00002d40| 65 72 2d 6d 61 70 7d 22 | 20 6e 69 6c 5d 29 0a 28 |er-map}"| nil]).(|
|00002d50| 66 73 65 74 20 27 65 6e | 65 72 67 69 7a 65 2d 6c |fset 'en|ergize-l|
|00002d60| 6f 67 2d 6d 6f 64 65 20 | 23 5b 6e 69 6c 20 22 c0 |og-mode |#[nil ".|
|00002d70| 20 88 c1 5c 6e 21 88 c3 | 14 c5 16 06 c7 20 88 c8 | ..\n!..|..... ..|
|00002d80| c9 21 87 22 20 5b 65 6e | 65 72 67 69 7a 65 2d 6d |.!." [en|ergize-m|
|00002d90| 6f 64 65 2d 69 6e 74 65 | 72 6e 61 6c 20 75 73 65 |ode-inte|rnal use|
|00002da0| 2d 6c 6f 63 61 6c 2d 6d | 61 70 20 65 6e 65 72 67 |-local-m|ap energ|
|00002db0| 69 7a 65 2d 6d 61 70 20 | 65 6e 65 72 67 69 7a 65 |ize-map |energize|
|00002dc0| 2d 6c 6f 67 2d 6d 6f 64 | 65 20 6d 61 6a 6f 72 2d |-log-mod|e major-|
|00002dd0| 6d 6f 64 65 20 22 45 6e | 65 72 67 69 7a 65 2d 4c |mode "En|ergize-L|
|00002de0| 6f 67 22 20 6d 6f 64 65 | 2d 6e 61 6d 65 20 65 6e |og" mode|-name en|
|00002df0| 65 72 67 69 7a 65 2d 6e | 6f 6e 2d 66 69 6c 65 2d |ergize-n|on-file-|
|00002e00| 6d 6f 64 65 2d 69 6e 74 | 65 72 6e 61 6c 20 72 75 |mode-int|ernal ru|
|00002e10| 6e 2d 68 6f 6f 6b 73 20 | 65 6e 65 72 67 69 7a 65 |n-hooks |energize|
|00002e20| 2d 6c 6f 67 2d 6d 6f 64 | 65 2d 68 6f 6f 6b 5d 20 |-log-mod|e-hook] |
|00002e30| 32 20 22 5c 0a 4d 61 6a | 6f 72 20 6d 6f 64 65 20 |2 "\.Maj|or mode |
|00002e40| 66 6f 72 20 74 68 65 20 | 45 6e 65 72 67 69 7a 65 |for the |Energize|
|00002e50| 20 45 72 72 6f 72 20 4c | 6f 67 20 61 6e 64 20 53 | Error L|og and S|
|00002e60| 79 73 74 65 6d 20 4c 6f | 67 20 62 75 66 66 65 72 |ystem Lo|g buffer|
|00002e70| 73 2e 0a 49 6e 20 61 64 | 64 69 74 69 6f 6e 20 74 |s..In ad|dition t|
|00002e80| 6f 20 74 68 65 20 6e 6f | 72 6d 61 6c 20 65 64 69 |o the no|rmal edi|
|00002e90| 74 69 6e 67 20 63 6f 6d | 6d 61 6e 64 73 2c 20 74 |ting com|mands, t|
|00002ea0| 68 65 20 66 6f 6c 6c 6f | 77 69 6e 67 20 6b 65 79 |he follo|wing key|
|00002eb0| 73 20 61 72 65 20 62 6f | 75 6e 64 3a 0a 5c 5c 7b |s are bo|und:.\\{|
|00002ec0| 65 6e 65 72 67 69 7a 65 | 2d 6d 61 70 7d 22 20 6e |energize|-map}" n|
|00002ed0| 69 6c 5d 29 0a 28 66 73 | 65 74 20 27 65 6e 65 72 |il]).(fs|et 'ener|
|00002ee0| 67 69 7a 65 2d 6d 61 6e | 75 61 6c 2d 6d 6f 64 65 |gize-man|ual-mode|
|00002ef0| 20 23 5b 6e 69 6c 20 22 | c0 20 88 c1 5c 6e 21 88 | #[nil "|. ..\n!.|
|00002f00| c3 14 c5 16 06 c7 20 88 | c8 c9 21 87 22 20 5b 65 |...... .|..!." [e|
|00002f10| 6e 65 72 67 69 7a 65 2d | 6d 6f 64 65 2d 69 6e 74 |nergize-|mode-int|
|00002f20| 65 72 6e 61 6c 20 75 73 | 65 2d 6c 6f 63 61 6c 2d |ernal us|e-local-|
|00002f30| 6d 61 70 20 65 6e 65 72 | 67 69 7a 65 2d 6d 61 70 |map ener|gize-map|
|00002f40| 20 65 6e 65 72 67 69 7a | 65 2d 6d 61 6e 75 61 6c | energiz|e-manual|
|00002f50| 2d 6d 6f 64 65 20 6d 61 | 6a 6f 72 2d 6d 6f 64 65 |-mode ma|jor-mode|
|00002f60| 20 22 45 6e 65 72 67 69 | 7a 65 2d 4d 61 6e 75 61 | "Energi|ze-Manua|
|00002f70| 6c 22 20 6d 6f 64 65 2d | 6e 61 6d 65 20 65 6e 65 |l" mode-|name ene|
|00002f80| 72 67 69 7a 65 2d 6e 6f | 6e 2d 66 69 6c 65 2d 6d |rgize-no|n-file-m|
|00002f90| 6f 64 65 2d 69 6e 74 65 | 72 6e 61 6c 20 72 75 6e |ode-inte|rnal run|
|00002fa0| 2d 68 6f 6f 6b 73 20 65 | 6e 65 72 67 69 7a 65 2d |-hooks e|nergize-|
|00002fb0| 6d 61 6e 75 61 6c 2d 6d | 6f 64 65 2d 68 6f 6f 6b |manual-m|ode-hook|
|00002fc0| 5d 20 32 20 22 5c 0a 4d | 61 6a 6f 72 20 6d 6f 64 |] 2 "\.M|ajor mod|
|00002fd0| 65 20 66 6f 72 20 74 68 | 65 20 45 6e 65 72 67 69 |e for th|e Energi|
|00002fe0| 7a 65 20 55 4e 49 58 20 | 4d 61 6e 75 61 6c 20 62 |ze UNIX |Manual b|
|00002ff0| 75 66 66 65 72 73 2e 0a | 49 6e 20 61 64 64 69 74 |uffers..|In addit|
|00003000| 69 6f 6e 20 74 6f 20 74 | 68 65 20 6e 6f 72 6d 61 |ion to t|he norma|
|00003010| 6c 20 65 64 69 74 69 6e | 67 20 63 6f 6d 6d 61 6e |l editin|g comman|
|00003020| 64 73 2c 20 74 68 65 20 | 66 6f 6c 6c 6f 77 69 6e |ds, the |followin|
|00003030| 67 20 6b 65 79 73 20 61 | 72 65 20 62 6f 75 6e 64 |g keys a|re bound|
|00003040| 3a 0a 5c 5c 7b 65 6e 65 | 72 67 69 7a 65 2d 6d 61 |:.\\{ene|rgize-ma|
|00003050| 70 7d 22 20 6e 69 6c 5d | 29 0a 28 62 79 74 65 2d |p}" nil]|).(byte-|
|00003060| 63 6f 64 65 20 22 c0 c1 | 21 ac 82 c2 11 c1 0b 9e |code "..|!.......|
|00003070| ac 85 c4 0b c5 5c 22 13 | c2 87 22 20 5b 62 6f 75 |.....\".|.." [bou|
|00003080| 6e 64 70 20 65 6e 65 72 | 67 69 7a 65 2d 73 6f 75 |ndp ener|gize-sou|
|00003090| 72 63 65 2d 6d 6f 64 65 | 20 6e 69 6c 20 6d 69 6e |rce-mode| nil min|
|000030a0| 6f 72 2d 6d 6f 64 65 2d | 61 6c 69 73 74 20 61 70 |or-mode-|alist ap|
|000030b0| 70 65 6e 64 20 28 28 65 | 6e 65 72 67 69 7a 65 2d |pend ((e|nergize-|
|000030c0| 73 6f 75 72 63 65 2d 6d | 6f 64 65 20 22 20 45 6e |source-m|ode " En|
|000030d0| 65 72 67 69 7a 65 22 29 | 29 5d 20 33 29 0a 28 66 |ergize")|)] 3).(f|
|000030e0| 73 65 74 20 27 65 6e 65 | 72 67 69 7a 65 2d 73 6f |set 'ene|rgize-so|
|000030f0| 75 72 63 65 2d 6d 69 6e | 6f 72 2d 6d 6f 64 65 20 |urce-min|or-mode |
|00003100| 23 5b 6e 69 6c 20 22 c0 | 20 88 c1 c2 21 88 c3 12 |#[nil ".| ...!...|
|00003110| 0c c5 20 1e 06 1e 07 c8 | 0e 06 c9 20 5c 22 88 ca |.. .....|... \"..|
|00003120| 0e 06 cb 5c 22 88 0e 07 | ab 9a cc 89 1e 0d 1e 0e |...\"...|........|
|00003130| cf 16 0e d0 0e 07 0e 0e | 5c 22 88 2a d1 0e 07 21 |........|\".*...!|
|00003140| 89 16 07 ac 66 d2 0e 06 | 21 88 2a d3 d4 21 87 22 |....f...|!.*..!."|
|00003150| 20 5b 65 6e 65 72 67 69 | 7a 65 2d 6d 6f 64 65 2d | [energi|ze-mode-|
|00003160| 69 6e 74 65 72 6e 61 6c | 20 6d 61 6b 65 2d 6c 6f |internal| make-lo|
|00003170| 63 61 6c 2d 76 61 72 69 | 61 62 6c 65 20 65 6e 65 |cal-vari|able ene|
|00003180| 72 67 69 7a 65 2d 73 6f | 75 72 63 65 2d 6d 6f 64 |rgize-so|urce-mod|
|00003190| 65 20 74 20 65 6e 65 72 | 67 69 7a 65 2d 73 6f 75 |e t ener|gize-sou|
|000031a0| 72 63 65 2d 6d 61 70 20 | 6d 61 6b 65 2d 73 70 61 |rce-map |make-spa|
|000031b0| 72 73 65 2d 6b 65 79 6d | 61 70 20 64 65 73 74 2d |rse-keym|ap dest-|
|000031c0| 6d 61 70 20 73 6f 75 72 | 63 65 2d 6d 61 70 20 73 |map sour|ce-map s|
|000031d0| 65 74 2d 6b 65 79 6d 61 | 70 2d 70 61 72 65 6e 74 |et-keyma|p-parent|
|000031e0| 20 63 75 72 72 65 6e 74 | 2d 6c 6f 63 61 6c 2d 6d | current|-local-m|
|000031f0| 61 70 20 73 65 74 2d 6b | 65 79 6d 61 70 2d 6e 61 |ap set-k|eymap-na|
|00003200| 6d 65 20 65 6e 65 72 67 | 69 7a 65 2d 6d 69 6e 6f |me energ|ize-mino|
|00003210| 72 2d 6d 6f 64 65 2d 6d | 61 70 20 6e 69 6c 20 70 |r-mode-m|ap nil p|
|00003220| 72 65 66 69 78 65 73 20 | 6d 61 70 70 65 72 20 23 |refixes |mapper #|
|00003230| 5b 28 6b 65 79 20 76 61 | 6c 29 20 22 c0 09 21 ab |[(key va|l) "..!.|
|00003240| 8e c2 0b 0c c5 42 5c 22 | 1b c6 09 0e 07 5c 22 29 |.....B\"|.....\")|
|00003250| 87 c8 0e 09 ca cb c2 0b | 0c c5 42 5c 22 5c 22 09 |........|..B\"\".|
|00003260| 23 87 22 20 5b 6b 65 79 | 6d 61 70 70 20 76 61 6c |#." [key|mapp val|
|00003270| 20 61 70 70 65 6e 64 20 | 70 72 65 66 69 78 65 73 | append |prefixes|
|00003280| 20 6b 65 79 20 6e 69 6c | 20 6d 61 70 2d 6b 65 79 | key nil| map-key|
|00003290| 6d 61 70 20 6d 61 70 70 | 65 72 20 64 65 66 69 6e |map mapp|er defin|
|000032a0| 65 2d 6b 65 79 20 64 65 | 73 74 2d 6d 61 70 20 61 |e-key de|st-map a|
|000032b0| 70 70 6c 79 20 76 65 63 | 74 6f 72 5d 20 38 5d 20 |pply vec|tor] 8] |
|000032c0| 6d 61 70 2d 6b 65 79 6d | 61 70 20 6b 65 79 6d 61 |map-keym|ap keyma|
|000032d0| 70 2d 70 61 72 65 6e 74 | 20 75 73 65 2d 6c 6f 63 |p-parent| use-loc|
|000032e0| 61 6c 2d 6d 61 70 20 72 | 75 6e 2d 68 6f 6f 6b 73 |al-map r|un-hooks|
|000032f0| 20 65 6e 65 72 67 69 7a | 65 2d 73 6f 75 72 63 65 | energiz|e-source|
|00003300| 2d 6d 6f 64 65 2d 68 6f | 6f 6b 5d 20 34 20 22 5c |-mode-ho|ok] 4 "\|
|00003310| 0a 4d 69 6e 6f 72 20 6d | 6f 64 65 20 66 6f 72 20 |.Minor m|ode for |
|00003320| 61 64 64 69 6e 67 20 61 | 64 64 69 74 69 6f 6e 61 |adding a|dditiona|
|00003330| 6c 20 6b 65 79 62 69 6e | 64 69 6e 67 73 20 74 6f |l keybin|dings to|
|00003340| 20 45 6e 65 72 67 69 7a | 65 20 73 6f 75 72 63 65 | Energiz|e source|
|00003350| 20 62 75 66 66 65 72 73 | 2e 0a 54 68 65 20 66 6f | buffers|..The fo|
|00003360| 6c 6c 6f 77 69 6e 67 20 | 6b 65 79 20 62 69 6e 64 |llowing |key bind|
|00003370| 69 6e 67 73 20 61 72 65 | 20 61 64 64 65 64 3a 0a |ings are| added:.|
|00003380| 5c 5c 7b 65 6e 65 72 67 | 69 7a 65 2d 73 6f 75 72 |\\{energ|ize-sour|
|00003390| 63 65 2d 6d 61 70 7d 0a | 0a 53 69 6e 63 65 20 74 |ce-map}.|.Since t|
|000033a0| 68 69 73 20 6d 69 6e 6f | 72 20 6d 6f 64 65 20 64 |his mino|r mode d|
|000033b0| 65 66 69 6e 65 73 20 6b | 65 79 73 2c 20 6f 6e 63 |efines k|eys, onc|
|000033c0| 65 20 69 74 20 67 65 74 | 73 20 74 75 72 6e 65 64 |e it get|s turned|
|000033d0| 20 6f 6e 20 79 6f 75 20 | 63 61 6e 27 74 20 72 65 | on you |can't re|
|000033e0| 61 6c 6c 79 0a 74 75 72 | 6e 20 69 74 20 6f 66 66 |ally.tur|n it off|
|000033f0| 2e 22 20 6e 69 6c 5d 29 | 0a 28 66 73 65 74 20 27 |." nil])|.(fset '|
|00003400| 72 65 63 65 6e 74 65 72 | 2d 64 65 66 69 6e 69 74 |recenter|-definit|
|00003410| 69 6f 6e 20 23 5b 6e 69 | 6c 20 22 c0 7f 88 09 c2 |ion #[ni|l ".....|
|00003420| 3d ab 86 c3 c4 21 88 aa | 84 c5 c4 21 88 c6 c4 21 |=....!..|...!...!|
|00003430| 87 22 20 5b 6e 69 6c 20 | 6d 61 6a 6f 72 2d 6d 6f |." [nil |major-mo|
|00003440| 64 65 20 63 2b 2b 2d 6d | 6f 64 65 20 63 2b 2b 2d |de c++-m|ode c++-|
|00003450| 62 65 67 69 6e 6e 69 6e | 67 2d 6f 66 2d 64 65 66 |beginnin|g-of-def|
|00003460| 75 6e 20 31 20 62 65 67 | 69 6e 6e 69 6e 67 2d 6f |un 1 beg|inning-o|
|00003470| 66 2d 64 65 66 75 6e 20 | 72 65 63 65 6e 74 65 72 |f-defun |recenter|
|00003480| 5d 20 32 20 22 5c 0a 50 | 6f 73 69 74 69 6f 6e 20 |] 2 "\.P|osition |
|00003490| 74 68 65 20 62 65 67 69 | 6e 6e 69 6e 67 20 6f 66 |the begi|nning of|
|000034a0| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 64 65 66 | the cur|rent def|
|000034b0| 69 6e 69 74 69 6f 6e 20 | 61 74 20 74 68 65 20 74 |inition |at the t|
|000034c0| 6f 70 20 6f 66 20 74 68 | 65 20 66 72 61 6d 65 2e |op of th|e frame.|
|000034d0| 22 20 6e 69 6c 5d 29 0a | 28 64 65 66 69 6e 65 2d |" nil]).|(define-|
|000034e0| 6b 65 79 20 67 6c 6f 62 | 61 6c 2d 6d 61 70 20 22 |key glob|al-map "|
|000034f0| 92 22 20 27 72 65 63 65 | 6e 74 65 72 2d 64 65 66 |." 'rece|nter-def|
|00003500| 69 6e 69 74 69 6f 6e 29 | 0a 28 66 73 65 74 20 27 |inition)|.(fset '|
|00003510| 65 6e 65 72 67 69 7a 65 | 2d 68 69 64 65 2d 65 72 |energize|-hide-er|
|00003520| 72 6f 72 2d 67 6c 79 70 | 68 73 2d 69 6e 2d 66 6f |ror-glyp|hs-in-fo|
|00003530| 72 6d 20 23 5b 6e 69 6c | 20 22 8a 8c c0 20 88 60 |rm #[nil| "... .`|
|00003540| c1 20 88 60 c2 1b 1c 89 | 1d 0c 7d 88 65 62 88 c6 |. .`....|..}.eb..|
|00003550| 60 21 89 13 ad 9a c7 0b | 21 64 57 ad 93 c8 0b c9 |`!......|!dW.....|
|00003560| 5c 22 ab 85 ca 0b c2 5c | 22 88 cb 0b 21 89 13 ac |\".....\|"...!...|
|00003570| 67 c2 2d 87 22 20 5b 65 | 6e 65 72 67 69 7a 65 2d |g.-." [e|nergize-|
|00003580| 62 65 67 69 6e 6e 69 6e | 67 2d 6f 66 2d 64 65 66 |beginnin|g-of-def|
|00003590| 75 6e 20 65 6e 65 72 67 | 69 7a 65 2d 65 6e 64 2d |un energ|ize-end-|
|000035a0| 6f 66 2d 64 65 66 75 6e | 20 6e 69 6c 20 65 20 65 |of-defun| nil e e|
|000035b0| 6e 64 20 73 74 61 72 74 | 20 65 78 74 65 6e 74 2d |nd start| extent-|
|000035c0| 61 74 20 65 78 74 65 6e | 74 2d 65 6e 64 2d 70 6f |at exten|t-end-po|
|000035d0| 73 69 74 69 6f 6e 20 65 | 78 74 65 6e 74 2d 70 72 |sition e|xtent-pr|
|000035e0| 6f 70 65 72 74 79 20 62 | 65 67 69 6e 2d 67 6c 79 |operty b|egin-gly|
|000035f0| 70 68 20 73 65 74 2d 65 | 78 74 65 6e 74 2d 62 65 |ph set-e|xtent-be|
|00003600| 67 69 6e 2d 67 6c 79 70 | 68 20 6e 65 78 74 2d 65 |gin-glyp|h next-e|
|00003610| 78 74 65 6e 74 5d 20 34 | 20 22 5c 0a 48 69 64 65 |xtent] 4| "\.Hide|
|00003620| 73 20 74 68 65 20 65 72 | 72 6f 72 20 69 63 6f 6e |s the er|ror icon|
|00003630| 73 20 69 6e 20 74 68 65 | 20 63 75 72 72 65 6e 74 |s in the| current|
|00003640| 20 74 6f 70 6c 65 76 65 | 6c 20 66 6f 72 6d 2e 0a | topleve|l form..|
|00003650| 59 6f 75 20 63 61 6e 6e | 6f 74 20 67 65 74 20 74 |You cann|ot get t|
|00003660| 68 65 6d 20 62 61 63 6b | 20 75 6e 74 69 6c 20 79 |hem back| until y|
|00003670| 6f 75 20 72 65 63 6f 6d | 70 69 6c 65 20 74 68 65 |ou recom|pile the|
|00003680| 20 66 69 6c 65 2e 22 20 | 6e 69 6c 5d 29 0a 28 62 | file." |nil]).(b|
|00003690| 79 74 65 2d 63 6f 64 65 | 20 22 c0 c1 4d 88 c2 c3 |yte-code| "..M...|
|000036a0| 4d 87 22 20 5b 65 6e 65 | 72 67 69 7a 65 2d 6e 65 |M." [ene|rgize-ne|
|000036b0| 78 74 2d 65 78 74 65 6e | 74 2d 66 6f 72 20 23 5b |xt-exten|t-for #[|
|000036c0| 28 63 6f 6d 6d 61 6e 64 | 20 70 72 65 76 20 6e 6f |(command| prev no|
|000036d0| 74 2d 74 68 69 73 2d 6f | 6e 65 29 20 22 08 ad 81 |t-this-o|ne) "...|
|000036e0| c1 c2 89 1b 1c 1d 8a 0b | ac ad 0e 06 ab 83 6f aa |........|......o.|
|000036f0| 81 6d ac a3 c7 60 70 5c | 22 89 14 0d 3d ac 8b 0d |.m...`p\|"...=...|
|00003700| c1 3d ac 86 c8 0c 0e 09 | 5c 22 13 0e 06 ab 83 ca |.=......|\"......|
|00003710| aa 81 cb 75 88 0c 15 aa | 50 29 0b ad 81 0c 2b 87 |...u....|P)....+.|
|00003720| 22 20 5b 6e 6f 74 2d 74 | 68 69 73 2d 6f 6e 65 20 |" [not-t|his-one |
|00003730| 6e 6f 6e 65 20 6e 69 6c | 20 72 65 73 75 6c 74 20 |none nil| result |
|00003740| 65 20 6c 61 73 74 2d 65 | 20 70 72 65 76 20 65 78 |e last-e| prev ex|
|00003750| 74 65 6e 74 2d 61 74 20 | 65 6e 65 72 67 69 7a 65 |tent-at |energize|
|00003760| 2d 6d 65 6e 75 2d 69 74 | 65 6d 2d 66 6f 72 2d 6e |-menu-it|em-for-n|
|00003770| 61 6d 65 20 63 6f 6d 6d | 61 6e 64 20 2d 31 20 31 |ame comm|and -1 1|
|00003780| 5d 20 34 5d 20 65 6e 65 | 72 67 69 7a 65 2d 6e 65 |] 4] ene|rgize-ne|
|00003790| 78 74 2d 65 78 74 65 6e | 74 2d 6f 6e 2d 6c 69 6e |xt-exten|t-on-lin|
|000037a0| 65 2d 66 6f 72 20 23 5b | 28 63 6f 6d 6d 61 6e 64 |e-for #[|(command|
|000037b0| 20 6e 6f 74 2d 74 68 69 | 73 2d 6f 6e 65 29 20 22 | not-thi|s-one) "|
|000037c0| 8a 8c 60 c0 7f 88 60 7d | 88 65 62 88 c1 5c 6e c0 |..`...`}|.eb..\n.|
|000037d0| 0b 23 2a 87 22 20 5b 6e | 69 6c 20 65 6e 65 72 67 |.#*." [n|il energ|
|000037e0| 69 7a 65 2d 6e 65 78 74 | 2d 65 78 74 65 6e 74 2d |ize-next|-extent-|
|000037f0| 66 6f 72 20 63 6f 6d 6d | 61 6e 64 20 6e 6f 74 2d |for comm|and not-|
|00003800| 74 68 69 73 2d 6f 6e 65 | 5d 20 34 5d 5d 20 32 29 |this-one|] 4]] 2)|
|00003810| 0a 28 66 73 65 74 20 27 | 65 6e 65 72 67 69 7a 65 |.(fset '|energize|
|00003820| 2d 74 6f 70 2d 6e 65 78 | 74 2d 70 72 6f 6a 65 63 |-top-nex|t-projec|
|00003830| 74 20 23 5b 6e 69 6c 20 | 22 60 18 c1 c2 c3 c4 23 |t #[nil |"`.....#|
|00003840| 89 1d ab 94 08 c6 0d 21 | 55 ab 8d 8a c7 0d 21 75 |.......!|U.....!u|
|00003850| 88 c1 c2 c3 c4 23 15 29 | 0d ab 86 c6 0d 21 62 aa |.....#.)|.....!b.|
|00003860| 83 c8 c9 21 2a 87 22 20 | 5b 70 20 65 6e 65 72 67 |...!*." |[p energ|
|00003870| 69 7a 65 2d 6e 65 78 74 | 2d 65 78 74 65 6e 74 2d |ize-next|-extent-|
|00003880| 66 6f 72 20 22 65 64 69 | 74 70 72 6f 6a 65 63 74 |for "edi|tproject|
|00003890| 22 20 6e 69 6c 20 74 20 | 65 20 65 78 74 65 6e 74 |" nil t |e extent|
|000038a0| 2d 73 74 61 72 74 2d 70 | 6f 73 69 74 69 6f 6e 20 |-start-p|osition |
|000038b0| 65 78 74 65 6e 74 2d 6c | 65 6e 67 74 68 20 65 72 |extent-l|ength er|
|000038c0| 72 6f 72 20 22 6e 6f 20 | 6e 65 78 74 20 70 72 6f |ror "no |next pro|
|000038d0| 6a 65 63 74 22 5d 20 35 | 20 22 5c 0a 50 6f 73 69 |ject"] 5| "\.Posi|
|000038e0| 74 69 6f 6e 20 74 68 65 | 20 63 75 72 73 6f 72 20 |tion the| cursor |
|000038f0| 61 74 20 74 68 65 20 62 | 65 67 69 6e 6e 69 6e 67 |at the b|eginning|
|00003900| 20 6f 66 20 74 68 65 20 | 66 6f 6c 6c 6f 77 69 6e | of the |followin|
|00003910| 67 20 70 72 6f 6a 65 63 | 74 2e 22 20 6e 69 6c 5d |g projec|t." nil]|
|00003920| 29 0a 28 66 73 65 74 20 | 27 65 6e 65 72 67 69 7a |).(fset |'energiz|
|00003930| 65 2d 74 6f 70 2d 70 72 | 65 76 2d 70 72 6f 6a 65 |e-top-pr|ev-proje|
|00003940| 63 74 20 23 5b 6e 69 6c | 20 22 60 18 c1 c2 c3 89 |ct #[nil| "`.....|
|00003950| 23 89 1c ab 92 08 c5 0c | 21 55 ab 8b 8a c6 75 88 |#.......|!U....u.|
|00003960| c1 c2 c3 89 23 14 29 0c | ab 86 c5 0c 21 62 aa 83 |....#.).|....!b..|
|00003970| c7 c8 21 2a 87 22 20 5b | 70 20 65 6e 65 72 67 69 |..!*." [|p energi|
|00003980| 7a 65 2d 6e 65 78 74 2d | 65 78 74 65 6e 74 2d 66 |ze-next-|extent-f|
|00003990| 6f 72 20 22 65 64 69 74 | 70 72 6f 6a 65 63 74 22 |or "edit|project"|
|000039a0| 20 74 20 65 20 65 78 74 | 65 6e 74 2d 73 74 61 72 | t e ext|ent-star|
|000039b0| 74 2d 70 6f 73 69 74 69 | 6f 6e 20 2d 31 20 65 72 |t-positi|on -1 er|
|000039c0| 72 6f 72 20 22 6e 6f 20 | 70 72 65 76 69 6f 75 73 |ror "no |previous|
|000039d0| 20 70 72 6f 6a 65 63 74 | 22 5d 20 35 20 22 5c 0a | project|"] 5 "\.|
|000039e0| 50 6f 73 69 74 69 6f 6e | 20 74 68 65 20 63 75 72 |Position| the cur|
|000039f0| 73 6f 72 20 61 74 20 74 | 68 65 20 62 65 67 69 6e |sor at t|he begin|
|00003a00| 6e 69 6e 67 20 6f 66 20 | 74 68 65 20 70 72 65 63 |ning of |the prec|
|00003a10| 65 65 64 69 6e 67 20 70 | 72 6f 6a 65 63 74 2e 22 |eeding p|roject."|
|00003a20| 20 6e 69 6c 5d 29 0a 28 | 66 73 65 74 20 27 65 6e | nil]).(|fset 'en|
|00003a30| 65 72 67 69 7a 65 2d 74 | 6f 70 2d 65 78 65 63 75 |ergize-t|op-execu|
|00003a40| 74 65 2d 63 6f 6d 6d 61 | 6e 64 20 23 5b 28 63 6f |te-comma|nd #[(co|
|00003a50| 6d 6d 61 6e 64 29 20 22 | c0 09 c2 5c 22 ae 86 c3 |mmand) "|...\"...|
|00003a60| c4 09 c5 51 21 1e 06 c7 | 09 0e 06 5c 22 29 87 22 |...Q!...|...\")."|
|00003a70| 20 5b 65 6e 65 72 67 69 | 7a 65 2d 6e 65 78 74 2d | [energi|ze-next-|
|00003a80| 65 78 74 65 6e 74 2d 6f | 6e 2d 6c 69 6e 65 2d 66 |extent-o|n-line-f|
|00003a90| 6f 72 20 63 6f 6d 6d 61 | 6e 64 20 6e 69 6c 20 65 |or comma|nd nil e|
|00003aa0| 72 72 6f 72 20 22 6e 6f | 20 66 6f 6c 6c 6f 77 69 |rror "no| followi|
|00003ab0| 6e 67 20 66 69 65 6c 64 | 20 6f 6e 20 74 68 69 73 |ng field| on this|
|00003ac0| 20 6c 69 6e 65 20 74 68 | 61 74 20 68 61 6e 64 6c | line th|at handl|
|00003ad0| 65 73 20 74 68 65 20 60 | 22 20 22 27 20 45 6e 65 |es the `|" "' Ene|
|00003ae0| 72 67 69 7a 65 20 63 6f | 6d 6d 61 6e 64 2e 22 20 |rgize co|mmand." |
|00003af0| 65 20 65 6e 65 72 67 69 | 7a 65 2d 65 78 65 63 75 |e energi|ze-execu|
|00003b00| 74 65 2d 63 6f 6d 6d 61 | 6e 64 5d 20 34 5d 29 0a |te-comma|nd] 4]).|
|00003b10| 28 66 73 65 74 20 27 65 | 6e 65 72 67 69 7a 65 2d |(fset 'e|nergize-|
|00003b20| 74 6f 70 2d 64 65 62 75 | 67 20 23 5b 6e 69 6c 20 |top-debu|g #[nil |
|00003b30| 22 c0 c1 21 87 22 20 5b | 65 6e 65 72 67 69 7a 65 |"..!." [|energize|
|00003b40| 2d 74 6f 70 2d 65 78 65 | 63 75 74 65 2d 63 6f 6d |-top-exe|cute-com|
|00003b50| 6d 61 6e 64 20 22 64 65 | 62 75 67 70 72 6f 67 72 |mand "de|bugprogr|
|00003b60| 61 6d 22 5d 20 32 20 22 | 5c 0a 45 78 65 63 75 74 |am"] 2 "|\.Execut|
|00003b70| 65 20 74 68 65 20 60 44 | 65 62 75 67 27 20 63 6f |e the `D|ebug' co|
|00003b80| 6d 6d 61 6e 64 20 6f 6e | 20 74 68 65 20 70 72 6f |mmand on| the pro|
|00003b90| 6a 65 63 74 20 61 74 20 | 6f 72 20 66 6f 6c 6c 6f |ject at |or follo|
|00003ba0| 77 69 6e 67 20 70 6f 69 | 6e 74 2e 22 20 6e 69 6c |wing poi|nt." nil|
|00003bb0| 5d 29 0a 28 66 73 65 74 | 20 27 65 6e 65 72 67 69 |]).(fset| 'energi|
|00003bc0| 7a 65 2d 74 6f 70 2d 64 | 65 6c 65 74 65 2d 70 72 |ze-top-d|elete-pr|
|00003bd0| 6f 6a 65 63 74 20 23 5b | 6e 69 6c 20 22 c0 c1 21 |oject #[|nil "..!|
|00003be0| 87 22 20 5b 65 6e 65 72 | 67 69 7a 65 2d 74 6f 70 |." [ener|gize-top|
|00003bf0| 2d 65 78 65 63 75 74 65 | 2d 63 6f 6d 6d 61 6e 64 |-execute|-command|
|00003c00| 20 22 64 65 6c 65 74 65 | 70 72 6f 6a 65 63 74 22 | "delete|project"|
|00003c10| 5d 20 32 20 22 5c 0a 44 | 65 6c 65 74 65 20 74 68 |] 2 "\.D|elete th|
|00003c20| 65 20 70 72 6f 6a 65 63 | 74 20 61 74 20 6f 72 20 |e projec|t at or |
|00003c30| 66 6f 6c 6c 6f 77 69 6e | 67 20 70 6f 69 6e 74 2e |followin|g point.|
|00003c40| 22 20 6e 69 6c 5d 29 0a | 28 66 73 65 74 20 27 65 |" nil]).|(fset 'e|
|00003c50| 6e 65 72 67 69 7a 65 2d | 74 6f 70 2d 65 64 69 74 |nergize-|top-edit|
|00003c60| 2d 70 72 6f 6a 65 63 74 | 20 23 5b 6e 69 6c 20 22 |-project| #[nil "|
|00003c70| c0 c1 21 87 22 20 5b 65 | 6e 65 72 67 69 7a 65 2d |..!." [e|nergize-|
|00003c80| 74 6f 70 2d 65 78 65 63 | 75 74 65 2d 63 6f 6d 6d |top-exec|ute-comm|
|00003c90| 61 6e 64 20 22 65 64 69 | 74 70 72 6f 6a 65 63 74 |and "edi|tproject|
|00003ca0| 22 5d 20 32 20 22 5c 0a | 45 64 69 74 20 74 68 65 |"] 2 "\.|Edit the|
|00003cb0| 20 70 72 6f 6a 65 63 74 | 20 61 74 20 6f 72 20 66 | project| at or f|
|00003cc0| 6f 6c 6c 6f 77 69 6e 67 | 20 70 6f 69 6e 74 2e 22 |ollowing| point."|
|00003cd0| 20 6e 69 6c 5d 29 0a 28 | 62 79 74 65 2d 63 6f 64 | nil]).(|byte-cod|
|00003ce0| 65 20 22 c0 c1 4d 88 c2 | c3 4d 88 c4 c5 4d 87 22 |e "..M..|.M...M."|
|00003cf0| 20 5b 65 6e 65 72 67 69 | 7a 65 2d 70 72 6f 6a 65 | [energi|ze-proje|
|00003d00| 63 74 2d 6e 65 78 74 2d | 66 69 65 6c 64 20 23 5b |ct-next-|field #[|
|00003d10| 28 26 6f 70 74 69 6f 6e | 61 6c 20 70 72 65 76 29 |(&option|al prev)|
|00003d20| 20 22 c0 60 70 5c 22 89 | 19 ab 91 5c 6e ab 88 c3 | ".`p\".|...\n...|
|00003d30| 09 21 53 62 88 aa 86 c4 | 09 21 54 62 88 c0 60 70 |.!Sb....|.!Tb..`p|
|00003d40| 5c 22 ac 8b 5c 6e ab 83 | c5 aa 81 c6 75 88 aa 6f |\"..\n..|....u..o|
|00003d50| c0 60 70 c7 23 ab 8b 5c | 6e ab 83 c5 aa 81 c6 75 |.`p.#..\|n......u|
|00003d60| 88 aa 6e 5c 6e ad 9a c0 | 60 70 5c 22 89 11 ab 86 |..n\n...|`p\"....|
|00003d70| c3 09 21 62 aa 8c c0 60 | 70 5c 22 3f ad 85 c5 75 |..!b...`|p\"?...u|
|00003d80| 88 aa 74 29 87 22 20 5b | 65 78 74 65 6e 74 2d 61 |..t)." [|extent-a|
|00003d90| 74 20 65 20 70 72 65 76 | 20 65 78 74 65 6e 74 2d |t e prev| extent-|
|00003da0| 73 74 61 72 74 2d 70 6f | 73 69 74 69 6f 6e 20 65 |start-po|sition e|
|00003db0| 78 74 65 6e 74 2d 65 6e | 64 2d 70 6f 73 69 74 69 |xtent-en|d-positi|
|00003dc0| 6f 6e 20 2d 31 20 31 20 | 77 72 69 74 65 2d 70 72 |on -1 1 |write-pr|
|00003dd0| 6f 74 65 63 74 65 64 5d | 20 35 20 6e 69 6c 20 6e |otected]| 5 nil n|
|00003de0| 69 6c 5d 20 65 6e 65 72 | 67 69 7a 65 2d 70 72 6f |il] ener|gize-pro|
|00003df0| 6a 65 63 74 2d 70 72 65 | 76 2d 66 69 65 6c 64 20 |ject-pre|v-field |
|00003e00| 23 5b 6e 69 6c 20 22 c0 | c1 21 87 22 20 5b 65 6e |#[nil ".|.!." [en|
|00003e10| 65 72 67 69 7a 65 2d 70 | 72 6f 6a 65 63 74 2d 6e |ergize-p|roject-n|
|00003e20| 65 78 74 2d 66 69 65 6c | 64 20 74 5d 20 32 20 6e |ext-fiel|d t] 2 n|
|00003e30| 69 6c 20 6e 69 6c 5d 20 | 65 6e 65 72 67 69 7a 65 |il nil] |energize|
|00003e40| 2d 70 72 6f 6a 65 63 74 | 2d 65 64 69 74 2d 66 69 |-project|-edit-fi|
|00003e50| 6c 65 20 23 5b 6e 69 6c | 20 22 c0 c1 21 87 22 20 |le #[nil| "..!." |
|00003e60| 5b 65 6e 65 72 67 69 7a | 65 2d 74 6f 70 2d 65 78 |[energiz|e-top-ex|
|00003e70| 65 63 75 74 65 2d 63 6f | 6d 6d 61 6e 64 20 22 65 |ecute-co|mmand "e|
|00003e80| 64 69 74 66 69 6c 65 22 | 5d 20 32 20 6e 69 6c 20 |ditfile"|] 2 nil |
|00003e90| 6e 69 6c 5d 5d 20 32 29 | 0a 28 66 73 65 74 20 27 |nil]] 2)|.(fset '|
|00003ea0| 65 6e 65 72 67 69 7a 65 | 2d 70 72 6f 6a 65 63 74 |energize|-project|
|00003eb0| 2d 70 72 75 6e 65 2d 75 | 6e 75 73 65 64 2d 72 75 |-prune-u|nused-ru|
|00003ec0| 6c 65 73 20 23 5b 6e 69 | 6c 20 22 8a 65 62 88 c0 |les #[ni|l ".eb..|
|00003ed0| c1 21 88 c2 79 88 c3 c4 | 89 1d 1e 06 1e 07 8a c8 |.!..y...|........|
|00003ee0| 0e 07 21 ab 9f c2 94 c2 | 95 7b c9 20 44 0e 06 42 |..!.....|.{. D..B|
|00003ef0| 16 06 c4 7f 88 68 ca 55 | ab 85 c2 79 88 aa 73 c2 |.....h.U|...y..s.|
|00003f00| 79 88 aa 5b c9 20 15 29 | 0e 06 9f 89 16 06 c4 1e |y..[. .)|........|
|00003f10| 0b 89 1e 0c ab b5 0e 0c | 40 16 0b 0d 62 88 cd ce |........|@...b...|
|00003f20| 0e 0b 40 21 cf 51 1e 10 | c0 0e 10 c4 d1 23 ab 92 |..@!.Q..|.....#..|
|00003f30| 0e 0b 41 d2 20 d3 94 c4 | 93 0e 0b 41 41 42 a1 88 |..A. ...|...AAB..|
|00003f40| aa 66 29 0e 0c 41 89 16 | 0c ac 4b 0d 62 88 0e 06 |.f)..A..|..K.b...|
|00003f50| 89 16 0c ab bf 0e 0c 40 | 89 16 0b 41 41 ac ad 0e |.......@|...AA...|
|00003f60| 0b 41 40 89 1e 14 62 88 | c4 7f 88 68 ca 55 ab 85 |.A@...b.|...h.U..|
|00003f70| c2 79 88 aa 73 c2 79 88 | 0e 14 60 7c 88 0e 14 c4 |.y..s.y.|..`|....|
|00003f80| 89 93 88 d5 0e 0b 0e 06 | 5c 22 16 06 29 0e 0c 41 |........|\"..)..A|
|00003f90| 89 16 0c ac 41 0d 62 88 | 0e 06 16 0c c2 1e 16 0e |....A.b.|........|
|00003fa0| 0c ab e6 0e 0c 40 89 16 | 0b 41 89 1e 17 ab cc 0e |.....@..|.A......|
|00003fb0| 17 40 62 88 c8 cd ce 0e | 0b 40 21 cf 51 21 ab 85 |.@b.....|.@!.Q!..|
|00003fc0| c8 d8 21 ac 84 d9 da 21 | 88 db 94 ac 8f c2 94 62 |..!....!|.......b|
|00003fd0| 88 dc dd 0e 16 21 de b1 | 03 88 aa 90 db 94 62 88 |.....!..|......b.|
|00003fe0| db 94 db 95 7c 88 dd 0e | 16 21 63 88 0e 17 40 c4 |....|...|.!c...@.|
|00003ff0| 89 93 88 0e 17 41 89 16 | 17 ac 34 29 0e 16 54 16 |.....A..|..4)..T.|
|00004000| 16 0e 0c 41 89 16 0c ac | 1a 2b 0d c4 89 93 2c 87 |...A....|.+....,.|
|00004010| 22 20 5b 72 65 2d 73 65 | 61 72 63 68 2d 66 6f 72 |" [re-se|arch-for|
|00004020| 77 61 72 64 20 22 5e 5b | 20 09 5d 2b 52 75 6c 65 |ward "^[| .]+Rule|
|00004030| 73 3a 22 20 31 20 22 5e | 5b 20 09 5d 2a 5c 5c 28 |s:" 1 "^|[ .]*\\(|
|00004040| 5c 5c 2e 5b 61 2d 7a 41 | 2d 5a 5d 2b 5c 5c 28 28 |\\.[a-zA|-Z]+\\((|
|00004050| 5b 30 2d 39 5d 2b 29 5c | 5c 29 3f 5c 5c 29 3a 22 |[0-9]+)\|\)?\\):"|
|00004060| 20 6e 69 6c 20 65 6f 72 | 20 61 6c 6c 2d 72 75 6c | nil eor| all-rul|
|00004070| 65 73 20 72 75 6c 65 73 | 2d 72 65 67 65 78 70 20 |es rules|-regexp |
|00004080| 6c 6f 6f 6b 69 6e 67 2d | 61 74 20 70 6f 69 6e 74 |looking-|at point|
|00004090| 2d 6d 61 72 6b 65 72 20 | 39 32 20 72 75 6c 65 20 |-marker |92 rule |
|000040a0| 72 65 73 74 20 22 5e 5b | 20 09 5d 2b 22 20 72 65 |rest "^[| .]+" re|
|000040b0| 67 65 78 70 2d 71 75 6f | 74 65 20 22 3a 22 20 70 |gexp-quo|te ":" p|
|000040c0| 61 74 74 65 72 6e 20 74 | 20 6d 61 6b 65 2d 6d 61 |attern t| make-ma|
|000040d0| 72 6b 65 72 20 30 20 70 | 20 64 65 6c 71 20 69 20 |rker 0 p| delq i |
|000040e0| 72 65 66 65 72 65 6e 74 | 73 20 22 5b 5e 3a 28 5d |referent|s "[^:(]|
|000040f0| 2b 5c 5c 28 28 5c 5c 28 | 5b 30 2d 39 5d 2b 5c 5c |+\\((\\(|[0-9]+\\|
|00004100| 29 29 5c 5c 7c 5c 5c 29 | 3a 22 20 65 72 72 6f 72 |))\\|\\)|:" error|
|00004110| 20 22 69 6e 74 65 72 6e | 61 6c 20 65 72 72 6f 72 | "intern|al error|
|00004120| 22 20 32 20 22 28 22 20 | 69 6e 74 2d 74 6f 2d 73 |" 2 "(" |int-to-s|
|00004130| 74 72 69 6e 67 20 22 29 | 22 5d 20 35 20 22 5c 0a |tring ")|"] 5 "\.|
|00004140| 44 65 6c 65 74 65 73 20 | 61 6c 6c 20 75 6e 75 73 |Deletes |all unus|
|00004150| 65 64 20 72 75 6c 65 73 | 20 66 72 6f 6d 20 74 68 |ed rules| from th|
|00004160| 65 20 52 75 6c 65 73 3a | 20 70 61 72 74 20 6f 66 |e Rules:| part of|
|00004170| 20 61 20 50 72 6f 6a 65 | 63 74 20 62 75 66 66 65 | a Proje|ct buffe|
|00004180| 72 2c 0a 61 6e 64 20 72 | 65 6e 75 6d 62 65 72 73 |r,.and r|enumbers|
|00004190| 20 74 68 65 20 72 65 6d | 61 69 6e 69 6e 67 20 72 | the rem|aining r|
|000041a0| 75 6c 65 73 20 73 65 71 | 75 65 6e 74 61 6c 6c 79 |ules seq|uentally|
|000041b0| 2e 22 20 6e 69 6c 5d 29 | 0a                      |." nil])|.       |
+--------+-------------------------+-------------------------+--------+--------+